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Dilwyn Jones Computing 
D % 41 Bro Emrys, Tal-y-Bont, 
Bangor, Gwynedd LL57 3YT 


Tel: Bangor (0248) 354023 


* NEW!! QL QUICK POSTERS £10.00 


Quick and effortless posters on most 24-pin printers and some 9-pin printers such as the Star 1.C24-10; and 
LC10. Use printer facilities such as enlarged text, multiple fonts, shadowing, outlining, NLQ, centering ete 
Reconfigurable printer driver. Send an SAE for further details and sample printout. 


* NEW!! QL HOME BUDGET £20.00 


How much improved and exclusively marketed by Dilwyn Jones Computing, an earlier version of this program 
(written by Joe Haftke) was reviewed in the April 90 issue of QL World, Helps to control your home finances by 
budgeting for and forecasting domestic bills. Also included is the program J TAX which is a tax calculator to help 
you work out your personal income tax and capital gains tax liabilities (note — even this program cannot 
guarantee to be as good as an income tax inspector so we recommend that you still check your figures with your 
professional adviser to be safe!) 


QL VISION MIXER £10.00 


Screen picture display and advertising system. Use any QL screens mode 4 or 8 (e.g. from PD2, Eye-Q, digitiser, 
scanner). Over a hundred visual effects. Needs at least 256k memory expanded QL. “. . , absolutely superb. . . | 
doubt if this package could be beaten.” M. Hopkinson, Quanta newsletter, June 90 


QL BASIC REPORTER £10.00 


SuperBASIC program report, analysis and programming aid. List variable names, procedures, functions, 
machine code extensions, trace, addresses, keywords, calls ete with this utility. “Good value, ., gives you lots of 
useful information...” (New Computer Express) 


QL WORDSCHECK £6.00 


Counts the total number of words in a file (ASCII text file or Qill doc file), reports what each word was and how 
often it was used 


All programs, except Wordscheck, are supplied complete with a manual (Wordscheck has Quill doc file 
instructions). Early users — if you would like a printed manual, contact us for the cost. 


AUTHORS 
We are looking for authors for a number of software project ideas we have! If you fancy writing a 
program in any QL language in return for a royalty agreement, or if you would like us to market 
your program for you, get in touch! 


SUNDRY SUPPLIES 


Floppy discs, Disc storage boxes (10/40/80 discs), Posso boxes, Printer stands, Disc labels, Address labels, 
Microdrive cartridge labels. Printer ribbons, Microdrive cartridges — send an SAE for a price list, or phone 


Please add £2.00 postage and packing except for software only orders and make cheques 
(Sterling only, please) payable to DILWYN JONES COMPUTING. Send an SAE for further 
details of the programs, which are available on 3.5" or 5.25" discs (please specify). At the 
moment, copies on microdrive are only available (if you supply cartridges with your order (2 
for Vision Mixer), but check with us first. Orders normally sent out within 48 hours where 
possible, except for larger orders where we may wait for cheque clearance. Goods remains the 
property of Dilwyn Jones Computing until paid for in full! 
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JUST FOR STARTERS 


A simple approach to using Abacus 


pipet cali yd eur BREAIVE BOWER PROGRAMMING IN C 
cover date. Wrappiitg up Continuing the series started in the 
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September issue, 


WELCOME TO THE WORLD OF DIGITAL PRECISION SOFTWARE . 


PC CONQUEROR WITH MS-DOS 
PC CONQUEROR 


addresses and 
PC compatibility faced by 
many QL users. Boot up your QL with PC 
Conqueror, and under 10 seconds later 
your QL will be a pretty compatible PC! 
This has been accomplished by our very 
meticulous and painstaking emulation of 
the functionality of a PC clone, down to 
the very operation of the 80x86 family 
of microprocessors! But you do not need 
to concern yourself about how we've 
Managed it - Conqueror works. It can 
read, write and format PC disks, run PC 
operating systems (including MS-DOS and 
DR-DOS, also Unix-clones +p system), 
move data QL<->PC and can multitask. In 
a full review in the May issue of QL 
World PC Conqueror was found to be very 
compatible - "every program I tried with 
Conqueror worked satisfactorily". On 
the subject of speed, QL World found 
Conqueror clocked in on average at 60% 
of the speed of a PC, even without 
user-tuning Conqueror's performance (a 
feature we put in for knob-twiddlers!). 
The price is £89.95, and add another £50 
in order to get MS-DOS v4.01 too. 


PC Conqueror answers the 


problem of 


ProPub is the state of the art QL 
QL desktop publishing system. It can 
handle user-input text and drawings 
in a huge variety of fonts, sizes and 
styles, as well as import from Quill, 
Editor, Eye-Q etc. This is a very 
user-friendly DTP program - most of 
its controls are intuitively obvious, 
but there is context-sensitive help 
available at every stage. Pixel 
proportionality, configurable space 
allocation between characters + 
words, honouring of bold/italics/ 
underline (+ other embedded commands) 
in the source text, word-wrap (text 
boxes can be of ANY shape), v-easy 
shadowing/brushwork and a detailed 
manual all combine to make this a 
spectacular system, ideal for pros 
and beginners alike ewie BOO. 9> 


This ProPub accessory enlarges fonts 
(80+ with Lightning SE, 20+ with 
ProPub) to sizes of your choice 


without any jaggedness £19.95 


SOLUTION WITH MS-DOS 
SOLUTION 


Solution is a pretty compatible 
PC Emulator, about half the 
speed of PC Conqueror. If you 
are on a tight budget, it is a 
snip at £39.95 or just £89.95 
including the full MS-DOS v4.01 


SUCCESS CP/M EMULATOR 


popular 0/S for Z80 machines. There 


CP/M was a 
are 1000s of good, cheap PD programs 
which Success lets you run on a QL. Just 


If your 
are the best désktop publishers for the QL. The 
Special Edition has bigger fonts, more features 
and is easier to 
produce classy dot-matrix 
one costs £24.95, the Special Edition £39.95. 


SPECIAL DESKTOP PUBLISHER 
DESKTOP PUBLISHER 


purse cannot stretch to ProPub, these 


but both allow you to 
output. The standard 


use - 


Eye-Q, a no-nonsense graphics 
program, is a joy to use. It 
matters not whether you need 


for it, 
£49.95! 


freehand work, diagrams, 


SPRITE GENERATOR 


SSG allows you to 
create and move objects 
around a screen at high 
speed without flicker. 
No machine code at all 
is needed! Just £29.95. 


3DP allows 
any 
objects 
outputs 


on 


3-D PRECISION 


create & manipulate 
3-dimensional 


dot-matrix 
& plotter....£49.95 


charts, technical drawing, it 
does it all. Eye-Q is £39.95. 


you to 


ULTRAPRINT 


Screen output to printer in 
20+ styles/sizes for £19.95 


screen: 


~ 


TURBO BASIC COMPILER + TOOLKIT PERFECT POINTER TOO! 


Turbo is the supreme SuperBASIC compiler for the This excellent program gives 
QL: stunningly fast, it produces code to run you an on-screen pointer 
typically dozens (sometimes 100s) of times faster (arrow) environment and all 
than interpreted SuperBASIC. When compared by QL the tools you are likely to 
World with “another product" it was Turbo that need to run it. Run your QL 
was found to be more SuperBASIC compatible. The this way now for just £29.95! 
toolkit provides a valuable extension to the 
functionality of the QL, and complements other 


toolkits. Turbo complete with toolkit is £99.95 4) QKICK M TITASKER 


A pull-down menu controlled 


multi-tasking program, ideal 
PERCHARGE BASIC COMPILER for running in the background 
Supercharge is half the speed of Turbo and lacks and giving you notepads, file 


many of Turbo's advanced features. A budget buy handler, clock, diary, mini- 
at £29.95, though. The quality is excellent. database, calc etc for £24.95 


TOOLKIT II QFLICK CARD INDEX SYSTEM 


Virtually everyone with a disk Few users actually require all the facilities 
system has TK2 Supertoolkit on- of a sophisticated database like Archive. 
board. Toolkit III takes off QFlick presents a very convenient alternative - 
where TK2 ended, greatly avery fast card-file database, with easy to 
increasing TK2's power (even learn snappy search and navigate commands and 
Sorts!). Toolkit III works good file-handling. You can move Archive data 
without TK2. This toolkit is to/from QFlick, and run multiple copies of 
for everyone with a QL...£29.95 QFlick in the background. A good buy at £29.95] 


DISKTOOL + QUICKDI LIGHTNING SPECIAL EDITION 


An exciting way to accelerate disk LIGHTNING 

access, add password protection and Lightning Special Edition is a program 
to optionally increase’ disk storage which will make your QL run over twice 
Capacity by 32K! This multitasking as fast as normal, with no side effects. 
utility can do much more - an ideal It will give your machine a professional 
complement to Media Manager....£19.95 - and very new - feel to it, as things 
- will happen quicker, screen ouput will be 
snappier, internal computations will be 
BETTER B Ic faster. Lightning SE does this quite 
automatically - no particular knowledge 
Better Basic is an expert system or skills are required by you. The 
which will improve your BASIC program installs itself on your boot-up 
programs - or those you type in - no cartridge(s) or disk(s), just like a 
end. Will even help experts! £24.95 | benevolent virus. When you then boot up 
= your QL, Lightning SE auto-installs 
itself. Thereafter all you notice is 


PROFESSIONAL ASTROLOGER very increased operating speed on the 


part of your QL. Lightning also adds many 

PROFESSIONAL ASTRONOMER new commands to the QL's repertoire, 
A complete Astrology and Astronomy including new types of scrolls, the 
system for beginners and experts facility to change fonts, colours etc in 
- the manual teaches you everything - existing programs (Quill included!) and 
producing dozens of pages of personal lots more, It is a magic wand you must 
data, forecasts, predictions and not afford to be without! A cut-down 
compatibility test results. The standard version costs £24.95 and the 
astrology module costs £59.95, the super full-speed, full-function Special 
astronomer £29.95 - save £20 if you Edition costs just £49.95: it is the best 


buy both. A world-beating program! program ever for the QL, bar none. 


(7 


Monitor allows you to 
trace the operation of 
machine code programs as 
they run. Breakpoints can 
be set. A snip at £19.95! 


Std Digital C (£29.95) is a high-speed C compiler. 
The Special Edition (£49.95) is even faster, and has 
structures, long pointers/integers, no 64K size 
limit, direct QDOS access, separate QL/C libraries. 


* There are five mew programs in our 
stable - Toolkit III, QFlick Card Index 
System, QKick Multitasker, Disktool with 
Quickdisk, and Perfect Pointer Tools - 
all created by Ultrasoft. 

* Our non-game programs are very 
comprehensively documented with A4 


Backgammon is a friendly companion, manuals averaging about seventy pages in 
Reversi a powerful and intelligent length (the largest is 325+). They are 


adversary well versed in alpha~ 


beta 4-hole punched for easy binding/ storage. 


search methods. Blocklands sets you * Microcartridge users please note: don't 
free in a 3D world measuring panic! we have large stocks of 
256x65536 QL screens. Droidzone is microcartridges and we are NOT going to 


a zap-em-up game faster than 
other. Arcadia is a2 in 1: 
Burner reminds one of JetPac, 
GridRacer is like nothing else! 
game is £9.95: £29.95 buys the 


any run out. Quality software on cartridge 
BMX will continue to be available from us for 
and the foreseeable future. You can buy 
Each cartridges from us at the rate of £19.95 
lot for a set of five cartridges. 


Superforth is a beautiful FORTH-83 compiler for If you have a disk system but 
the QL. It produces stand-alone, very fast FORTH still have programs on 
code which you can EXEC or EXEC _W: the official cartridge that assume mdv is 
specification for the language is very greatly the device name, this program 
exceeded. FORTH is a very rewarding language to will move them across without 
learn, and the supplied manual is a a complete hassle. Damages only £9.95! 


tutorial for FORTH, assuming no knowledge at all 
and taking you through FORTH one step at a time. 
The whole Superforth system will cost you £39.95. 


\ eines 


If you have no real interest 


in astrology or astronomy but 
want a program to have some 


This £49.95 program is NOT just for creating fun with, this one is just 
adventures but is for everyone who wants to write ideal! You might just learn 
in BASIC. A treasure trove of utilities..... something too.... Only £24.95 


graFix is specifically designed 
for output of screens and DTP 
pages (from all our publishers) 
onto 24 pin printers: advanced 
features such as interpolation 
(x & y) and magnification (also 
x & y) are provided. A vital 
ProPub accessory for just £9.95 


Microbridge is a good standard Contract bridge 
bidder, player and master tutor, providing 
non-intervening opponents as well as a partner 
well-versed in Acol. It can show its reasoning 
for bids on screen 4-5 lines of conversational 
English! The program doesn't cheat (each hand 
is managed independently, making deductions 
from bids and play just like humans).....£34.95 


EDITOR SPECIAL EDITION 
EDITOR 


Not just a word processor - more 
a way of life. The Editor 
Special Edition (SE) is a super 
powerful data management tool, 
whose simple-to-master user 
interface was the result of 
many months of careful design. 
Absolute consistency of control 
and operation is its hallmark. To 
illustrate this, ALL Editor 
commands have exactly the same 
Structure - verb, followed by a 
separator (any one of your 
choice) and one or more optional 
nouns (if more thar one, 
separated by the same separator) : 
so F/and will Find the first 
occurrence of and after the 
cursor. You can even put your 
commands into files and then 
execute them like programs. 
Multi-columnar work is easy. You 
can run many copies of Editor 
simultaneously, with overlays 
On-screen or with split screens. 
The standard version is £29.95 
and the Special Edition (faster, 
twice the features) costs £49.95 
with a clear, 160 page manual 


THE SMALL PRINT 


woted fig tf are 


tae ree He iN ied 


all rial and lian a 
et are § ecting ee ray 
ing postal 


ri sa 


i 
a vil he 


art 


agit ive 


it i 


nelusive 0 


2 chasers ~ the 
i Hi i allt g 
Aus arrive 4 
Keceo the 
rane 
roc nent 
Hae ing, VI 
ti 


lik 


ora 


im 0 
nk or 
e 4 ale 
tei 


tethee afer to Alt 
‘ We, 


upgrade Trow one veision 0 
us the cartridge/ aia, 
tae Nera 


Speci 
0 Bl 
a 


pr 

cept 

te 

of fi bpgrag e avec 


price betveen the Yo prog f mT 
Wreck op 1s ng nae 
ui alt! ib i ered i in ctr and 


ti pril/May i, teaiee at Gh i 


ogra f a Superi 
he case 


f 


i Cos! 


Please send me: 


tthe quo 
th Mt rated 
Jon charges 


wie order, in 


cc 


tr program, 
Pete es 

e name, send the manua 

ite difference in curren 


oe Fits fi 


MEDIA MANAGER SPECIAL EDITION 
MEDIA MANAGER 


MMSE is a joy to use. Whether something has 
gone wrong with a disk or tape ("Not found", 
"Not a valid Quill file", "Bad or changed 
medium", "Read/write failed" etc) or whether 
you want better control over your programs 
and data, MMSE should be to hand. Virtually 
any calamity can be recovered from 
automatically: all permutations (accidental 
deletion, partial overwriting or formatting, 
errors yielding: bad map but OK directory, 
bad directory but OK map, bad map and 
directory, OK map and directory but bad file 
sectors, unknown fault, power glitch 
corruption and so on) have been catered for. 
It isn't just for when things go wrong, 
either - many useful utilities are included. 
MMSE costs just £49.95, or £24.95 for a 
cut-down std version that is less friendly. 


IDIS SPECIAL EDITION 
IDIS DISASSEMBLER 


Ordinary disassemblers are almost useless, 
requiring detailed knowledge of the program 
being disassembled (Catch-22). IDIS is an 
intelligent disassembler and gives you nearly 
auto output for £24.95 - the Special Edition 
goes much further and costs only £39.95. 


BARGAINS 


SPECIAL LIMITED PERIOD OFFER: ACT NOW 


for 


i 


ona 


* Buy ANY TWO programs 
order, ‘s rate 


get 10% off the total price! 
* Buy ANY THREE programs 

get 15% off the total price! 
* Buy ANY FOUR programs 

get 20% off the total price! 
* Or buy FIVE or more programs 

get 30% off the total price! 


fv 


wnt 


is 
te 


This is a very generous offer. 
take it while it lasts 


Or telephone 
081-527 5493 


Please 


Name: 


Address: 


Postcode: 


Enclosed; CHEQUE/PO/CASH/VISA/MASTERCARD/ACCESS/EUROCARD for 5 


Card No: 


Signature: 


Expiry: 
l use: (QL/THOR) (MDV/3.5" DISK/5.25" DISK) (360/720/1440 SECTORS) 


40) 
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PSION ORGANISER — ee EEE = 


I Using Psion Organiser ZBASC viseoscssssnneren £69.00 Easy Money «. £69,00 
sion BOOK mies Spelling Checker... "fj Spellmaster £59.00 288 Computer.......... £230.00 


Comms Link... Py XP230K 
32K DRampack....... Ak tine i Thinkz........ £50.00  Z-Term £50.00 


Doniontetinecn ne Penn Pantie r Cambridge Topper ...... £8.00 Superchip 150.00 
Organiser 1Z.. 4 File Handling Book... “fl Centronics interface .. £30.00 128K Eprom £50.00 
128K Datapak athe 32K Datapak... 12BK RAM Pack ss.nses £50.00 Z-Tape vresssinsnseneisnne £50.00 


COMPUTERWARE 


the QL stockist 


Tel: 0303-81-2801 
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TNS CENE! 


QL World has been given a 
list of bulletin boards which 
carry the International QL 
Conference. it is echoed 
between these bbss so that a 
message written on one 
system will appear on the 
others within a couple of days. 
Local phone numbers aree 
given. 

Fourth Dimension BBs (UK) 
0202 600305, Fidonet node 
255/26; TF services (UK) 071 
702 2379; Syncnet BBS 
(Holland) 035 237 178; Fidonet 
node 283/500; Ku-El Tel 


QL Conference 
on BBS 


(Holland) 01650 37105; 
Fidonet node 285/102; 
Jamten-TCL (Sweden) 0642 
10300, Fidonet node 202/602; 
PIX (Sweden) 031 960447; 
Fidonet node 202/300; EDKX 
1 (Sweden) 08 719 5789, 
Fidonet node 201/108. All 
systems use 8 bits, no parity, 
and take 2400 and 1200 baud. 
The Swedish bbss operate in 
Swedish. 

For more _ information 
contact Michael Cronsten, 
Sysop, Jamten-TCL, Soere 
1073, 83030, Sweden, 


Programmer Chris Boutal, 
already the author of Archive 
routines for genealogical 
researchers, has produced a 
compiled SuperBasic program 
for QL users interested in 
recording their family trees. 

Called QL__Genealogist, 
the program is available on 
3.5in disk, with a substantial 
and clear A4 manual which 
explains how to build up a 
family tree, and how to use the 
program. The disk as supplied 
contains the program as an obj 
file, along with a boot file 
(which needs extra memory to 
run), and an 128K version of 
the program for use on an 
unexpanded QL. There are 
demonstration files available 
containing the 30 generations 
of British kings and queens. 

Users wanting to obtain the 
128K versions on microdrive 
are asked to send a formatted 
cartridge when ordering — the 
disk is supplied as well as part 
of the standard package. 

QL_Genealogist costs 
£19.50 from Chris Boutal at 
42 Charwood Road, Woking- 

ham, Berkshire RG11 1RY. 


Ero 


A short correction to the 
program Ciphers, from QL 
World August 1990: line 240 
should end with: 


allowed)": b2 


and line 460 with; 


to Quit” 
Eras 
A small amendment to last 
month's short Prog, 


Dir_to_Archive_Bas. The 
init routine at line 710 now 
reads: 


719 WINDOW 512,256,0,0: 
MODE 4: CLS 


Erat 


And now a correction to 
Programming in C, page 23, in 
last month's issue. The 
backslashes were omitted 
from sections of text and one 
line in Figure 2. The 
paragraphs should read: 


“Note that the first call to 
a includes the characters 

n in the string that is 
displayed. Characters pre- 
ceeded by a \ are known as 
escape sequences, and have 
a special meaning. Some of 
them are: 


Italian Meeting 


The Second Italian QL 
Users' Meeting is taking place 
in Italy on 27th and 28th 
October. 

The venue is expected to be 
the Centro Congressi Di 
Maderno, 5 or 10km from the 
Villa Alba, Lake Garda, last 
year's northern Italian site. 

Attractions are expected to 
include talks and demonstra- 
tions from users and suppliers, 
a bring and buy stand, and 


advice about accommodation, 


booking etc, for foreign 
visitors. 
For information please 


contact Eros Forenzi, Via 
Valeriana 44, 23010 Ber- 
benno (SO), Italy, local 
telephone 0342 492323, or 
Giovanni Zane, Viale M E 
Bossi 39, 25087 Salo’ (BS), 
Italy, local telephone 0365 
40102, local fax 0365 520184, 


save 2 August 1980 


FT.ComClub 


| 
| 
| 
i 


\n — 
character 

\t — print a TAB character 

\f — print a FORMFEED 
character 

\\— print a \ character" 

\\b — print a backspace 
character” 

The missing slash from the 


last line of the text block in 
Figure 2 should read: 


print a newline 


you use\n at the end 


Our setters are looking into 
ways of preventing the \ 
escaping in future. 


Eurofair 

The European Microfair '90 
takes place on 6th October in 
the sporting hall of the 
EuroVolleyCentre, Vilvoorde, 
Brussels, Belgium, as 
announced in last month's QL 
World. For information contact 
Jacques Tasset, Aarlen- 
straat 104, B-1040 Brussels. 
Local phone 02 233 12 22. 


Issue 2 of FT. ComClub, the 
Fleet Tactical Command 
User Group's small newsletter, 
has just appeared, carrying 
forward news of Fleet Tactical 
Command V2, which is now 
under development. V2 is 
scheduled for availability in “a 
couple of months", but the 
authors also say that they 
cannot develop the program as 
fast as they would like owing to 
the difficulty of covering costs 
‘on such a complex program. 

Some of the projected 
developments are simplified 
TEXT command entries, anda 
TOW (ship) option which will 
prolong ship life. The “bad 
news" — their words, not ours 
— includes weather situations 
up to Gale Force 10, crew 
fatalities if hit, and greater 
damage sustained if attacked 
in a low state of readiness. 

Some scenario changes 
have been made, and there is 
considerably greater flexibility 
all round regarding transfer of 
crew, replenishing stores and 
fuel, emergency cease-fires 
and infringement of neutral 
zones, to name but a few 
Small wonder that professional 
users are looking closely at 
Fleet Tactical Command. 
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PEN (RHANNEL 


Open Channel is where you have the 
opportunity to voice your opinions in Sinclair 
QL World. Whether you want to ask for help 
with a technical problem, provide somebody 


with the answer, or just sound off about 
something which bothers you, write to: Open 
Channel, Sinclair QL World, 116/120 Goswell 


Road, London ECIV 7QD. 


Neil Taylor's article on sorting 
was avidly read here. as sorting 
is a must in my Basic program- 
ming, | am recording chur- 
ehyard lichens, and use three 
arrays, one for Latin names 
[lat8(x,36)], one to hold four 
code numbers for church, subs- 
trate, ete. [lik%(x,3)] and an 
index array [ix%9x)]. 

After a bateh of names is 
entered, in order to save car- 
tridge space, the entire list, 
now exceeding 4,000, is sorted 
by two parameters: Latin name 
and church number combined, 
Then all duplicate names and 
even duplicated generic names 
are reduced to zero and the 
array saved. When re-loading, 
the missing names and genera 


tre reduced to zero and the 
uray saved, When re-loading, 
he missing names and genera 
are replaced, and because the 
index is also sorted. the array is 
filled in the original unsorted 
manner, church by church, 
4000 names takes about 45 
minutes to sort 

T compared Neil's sort with a 
bubble sort, and also with 
Marcus Jeffreys’ recursive 
quicksort which appeared in 
the August 1985 issue of OL 
World, The results were: 


Bubble 171 seconds 
Neil Taylor 106 seconds 
Marcus Jeffrey 36 seconds 


All of these would have been 
approaching 30% quicker but 
for the fact that I print one of 
the incrementing array lines to 
screen to watch progress, 


No-one, so far as Lam aware 
has yet bettered Marcus J 
frey’s sort. The need to have an 
y line with an entry 
such as ‘22272 227° or *99999" is 
no problem. The problem that 
1 can see with Neil’s sort is the 
need for a duplicate array in 
which to place presorted items. 
If one’s ram is already three- 
quarters full, | don’t see how 
there can be room for another 
similar sized array. 

1 enclose the test program 
The command ‘setup’ fills the 
initial array. ‘slow’, ‘start’ and 
‘fast’ initiate the sorts, ‘dup’ 
refills the initial unsorted array 
before trying another sort and 
‘see’ enables the results to the 
screen, 


Don Smith 
Westfields 
Kirkymoorside 


Editors comment: Send an SAE 
to QL World if you would like a 
copy of Don Smith's listing 

Neil Daglish will copy his 
program for anyone who sends 
an mdy or 3.Sin disk plus a self 
addressed envelope, to him at 
the Education Department, 
Vietoria University, PO Box 
6000, Wellington, New Zea- 
land. 


The January issue of OL World 
prompted me to write on two 
points. Firstly, in Daniel 
Blaum's article on the Qualsoft 
terminal emulator, he refers to 
receiving at 4800 baud as “the 
QL seems to have difficulty 
receiving at 9600 baud”. The 
reason is that he has specified 
one stop bit for STarTERM 
and Procomm (see page 14 of 
the Concepts section of the 
User Guide: “If the QL is set 
up to 9600 baud . . . at least 14 
stop bits are required,”), 
Secondly. how has John 
Acielo interfaced his XT-type 
keyboard to his cased-up QL? 
For that matter, have any read- 
ers obtained information on 


connecting PC-type keyboards 
to QLs by means other than the 
Schon or ABC interfaces? 

Ona slightly different topi 
have any readers had any suc- 
cess networking QLs and Spec- 
trums with Interface 1? 

Mike Fleming 
‘Tamworth 
Staffs 


Editor's comment: Interfacing 
PC-type keyboards is a popular 
subject now that the Schon and 
ABC interfaces are no longer 
freely available, QL World 
would like to hear from readers 
who have tackled this type of 
project successfully. 


Quill is a very good word 
processor, but it is a compli- 
cated procedure loading Quill 
when all that is wanted is to 
type a few lines for, say, a short 
memo or to address an 
envelope. Your readers might 
be interested in the following 
short program which makes the 
OL plus printer operate like a 
typewriter. It was written for 
the Epson LQ400 dot matrix 
printer with a parallel inter- 
face, but it should work with 
any printer, although it may be 
necessary to change line 120, 
which sets left and right hand 
margins, fora different printer. 


100 OPEN#3, SER 

120 PRINT#3, CHRS$(27); 
“1";CHR$(6);CHR$(27); 
“Q";CHRS(75) 

130 MODE 4 

140 WINDOW #2,482,246,15, 
9,BORDER #2.1.1,7 

150 WINDOW 416,235,45.19, 
PAPER 2:INK 7:CLS 

160 REPeat getline 

170 INPUT a$ 

180 PRINT#3. a$ 

190 END REPeat getline 


It is not possible to make the 
printer type letter by letter, but 
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this program types line by line. 
ach line is displayed on the 
sereen and can be edited to. 
remove errors. Pressing 
ENTER causes the line to be 
printed and moves the cursor 
to the start of the next line. The 
WINDOWS are set to give a 
half-inch margin at each side of 
an A4 sheet of paper but these 
and the printer margins could 
be changed to suit smaller 
sheets. 
T Ashcroft 
Jesmond 
Newcastle upon Tyne 


The latest problem I have had 
with PDQL concerns an alle~ 
ged product called SuperBasic 
C-Port, For months now the 
mild-voiced man to whom one 
speaks on the rare occasions 
that one can get past the 
Ansaphone has been assuring 
me that the product is all but 
ready to ship (but if it wasn't 
ready in December, why did he 
advertise it?) and indeed on the 
last two occasions he assured 
me that it was now ready to 
ship and only needed copying 
onto a disk and putting in a 
Jiffy bag. 

What he has done by mi: 
leading me for six months is to 
divert me from sceking an 
alternative solution to my 
problem of how to get a parti- 
cular piece of software over to 
the IBM environment. As a 
result, | would caution anyone 
secking to enter into any busi- 
ness relationship with PDQL. 
For support one needs reliabil- 
ity, and PDQL is, in my experi- 
ence, totally lacking in that 
commodity, 

Might I make a final offer 
through your columns. If there 
really is a piece of software out 
there called SuperBasic C- 
Port, and if there is anyone 
who has a legitimate copy (one 
of the Beta testers if they really 
do exist), or better still, the 
authors read this. would they 
please contact me at the above 
address. I will pay costs to the 
first one to send me a copy. I 
will also guarantee that, should 
T receive a copy in this way, I 
will make my offer to purchase 
a legitimate copy at the full 
price from PDQL irrevocable, 
should that outfit ever get 
around to sending me one. T 
cannot ‘say fairer than that. 1 
am not trying to promote 
‘pirate’ software. 
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The real trouble with the OL. 
has been that a brilliant 
machine has never taken off 
because it is. in part. marketed 
and supported by wallies like 
PDOL. 

J A Davis 

54 Woodlands Road 
Bookham 

Surrey KT23 4HH 


Editor's. comment: _ Private 
users and especially businesses 
suffer greatly from misleading 
claims by suppliers, not just in 
the QL community, with the 
greatest difficulty in estab- 
lishing any rights of redress. 
The situation between PDQL 
and software authors on their 
lists is not known to us in any 
detail but we have heard from at 
feast one author who would like 
to remove his products, and 
others who have expressed great 
concern. Copying non-pd soft- 
ware for other than backup 
purposes is always a breach of 
copyright, but the exclusive 
copyright does not always rest 
with the publisher, If anyone 
with executive power over this 
program is reading this, OL. 
World as well as J A Davies 
would like to hear from them, 


Lis 


gs 


On the subject of user-friendly 
listings: many magazine listings 
seem to be error-ridden, To 
debug them takes some time as 
often the listings are optimised 
down to minimum length. The 
only simple solution, which I 
sometimes adopt, is to write 
programs in long-winded trans- 
parent style. When these are 
trouble-free I then optimise 
them and store both listings. If 
magazines were to print both 

ear-English” and “abbrevi- 
ated” versions, this would 
greatly facilitate comprehen- 
sion, development — and 
exchange of routines, 

With the QL,  “near- 


English” programming is the 
User 


form advised in the 
Guide. Luckily, English 
ings rarely use the interactive 
* variable (as is so often the 
case on the Continent) but one 


too often meets “L™, “I, and 
COX 
Regarding formal _ para- 


meters, these are a bug-bear, a 
fact seldom referred to in OL. 
literature. The only way to use 
them efficiently is to pass the 
formal value to a local vairable 


at the beginning of the routine, 
and to return values using a 
global variable such as OUT. It 
is worth noting that while for- 
mal parameters are type- 
independent on etry, it is 
impossible to return alphanu- 
meric strings unless the routine 
e is suffixed with “$". 
‘ant mention of this 
in any documentation! 

Regarding division by zero: 
someone, somewhere, decided 
that this was “illegal”. In 
graphics routines, especially 
using 40, division by zero is 
often necessary, and can be 
replaced with no effort by 
dividing by minus one over 
infinity, 

Finally, why bother to buy a 
QL? In my own case, I bought 
a JM in 1984 in France to learn 
programming, and to. replace a 
TI 57 which I used in land 
drainage surveying. At the 
time, variou: is i 
was impossible to use the Psion. 
4 in accounting, graphics pro- 
jects, etc. The company there- 
fore bought other machines 
and tailor-made programs that 
neither give complete satisfac- 
tion nor can be understood by 
the “advisors”. So my QOL 
offers a few games for the kids 
and allows myself to develop 
greater knowledge of problem- 
evaluation. 

As a leisure activity, prog- 
ramming beats crosswords 
hands down. 


Stephen Poole 
Aube 
France 


Mike Lloyd (Software File, 
August 1990) says that our QL. 
is only half the beast without 
QPAC-2. He also notes tht 
“mice are rather rare in the OL 
World”. Both true: but if a 
trackerball is used in place of a 
mouse, the improvement is 
even more spectactular. The 
Atari trackerball is unnecessar- 
ily large, but it fits instantly in 
place of the QIMI mouse, and 
works wonders with bar-menu 
programs like Page Designer 2, 
for example. Mine cost £15, 
secondhand. 
CR Oswin 
Christchurch 


PS Windows/icons/mouse/ 
programs = WIMP. Bar- 
menu/trackerball/programs = 
BARMPOT 


You ask for comments on the 
new cover. It isa little difficult 
to judge from the mono pre- 
view, but I’m afraid my initial 
reaction is tht I'm not over- 
impressed, On the other hand, 
Tam not really worried about 
the cover, particularly since I 
get the magazine on subscrip- 
tion and therefore do not need 
to have my eye caught by itona 
newsagent’s display. 

Tam, however, interested in 
the contents and, irrespective 
of my queries to the Psion 
Solutions, 1 think they are 
improving. There are fewer 
errors in listings these days. 
There are still a few errors in 
typesetting, notably a letter in 
the August issue decrying the 
use of the letter | as a variable, 
being confused with the num- 
ber 1. I do agree with the 
writer, though, and, while ree- 
ognising the problems, would’ 
be inclined to return such list- 
ings to the authors for editing, 
as T also would those listings 
which purport to be from 
knowledgeable people who, 
nevertheless, can’t be bothered 
to set up translates property 
but set the dip switches to get 
the £ sign and end up with 
listings giving channel £1, ete. 


Ken Davies 
Silverdale 
Lanes, 


Editor's comment: We wanted 
to run the new design in colour, 
but we ran out of colour sites 
and had to swap the abstract 
base artwork for the paler cur- 
rent month's cover. We consi- 
dered the point of view that the 
cover doesn't matter to subscri- 
bers, but we find it improves the 
handling qualities and useful- 
ness of the magazine to have a 
distinct cover each month, even 
if it is mainly a variation in 
colour. Also, of course, newsa- 
gent buyers are an important 
part of our readership. Not 
everyone wants to buy every 
issue, but they want a chance to 
look at it. 

That letter must have slipped 
through at the last minute, with 
the result that, ‘somebody will be 
having a good laugh at my 
expense. Tam in agreement that 
it causes. fewer, problems if your 

‘default settings give accurate 


listings rather than accurate 
_ pound signs. 


oe 


a | 


A P 


here has been some discussion 
recently about possible upgra- 
des to the QL. As the subject is 
in the air once again, what about 
sending in your comments regarding what 
you would like (reasonably) to see in 
either add-on boards or a new machine? 
One obvious approach is to make a go- 
faster board that could be fitted to existing 
QLs, but this approach does place quite 
severe constraints on designers and they 
would probably prefer to be able to design 
acomplete new machine. Features which 
would almost certainly be present on a 
new machine are 40 MB (or more) hard 
disk, 1 MB (or more) ram, 68020, 68030 or 
68040 cpu chip, and an improved operat- 
ing system. Don't neglect to say how 
much you would be prepared to spend! 


Speed 


The QL is often complimented for its 
good design, but speed is not one of its 
best points. Not that it is particularly slow, 
but it certainly looks sluggish when com- 
pared to some more modern systems. 
Speed is very much a perceived thing. As 
with 0-60 mph times for cars, many 
benchmark test results are just plain 
useless to the ordinary user as a serious 
guide to how the computer will perform. 
Since most of our readers seem still to be 
using Quill and microdrives, the clock rate 
of the central processor is not the factor 
that matters most to them. The slow 
routines used in Quill, for putting text on 
the screen and for accessing the drives, 
are of much greater importance. 

Comparing Quill on a PC/AT with Quill 
on the QL, using hard disk on the PC and 
floppy disk on the QL, the QL looks terribly 
sluggish, even with Lightning and Turbo- 
Plus giving Quill a boost. What matters to 
someone who wants to create sizeable 
documents is the speed with which the 
cursor can be moved around, and the 
loading and saving times. It's not really 
comparing apples with apples, though. 
Quill was rewritten for the PC, with the 
experience of the QL version available, 
and runs much faster because of that. 

Almost any hard disk operates faster 
than any floppy disk. My PC has a disk- 
caching routine which raises performance 
well above standard; the cpu itself has a 
nominal clock rate of 10 MHz, which is not 
that much greater than the 7.5 MHz QL. 
Any design for a successor to the QL has 
to utilise much faster screen— and disk— 
drivers, and the poeple who write prog- 
rams for it need to be smart in using the 
improved drivers. There are programs 
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which make the QL look speedy. Flash- 
Back is an obvious example. QTyp makes 
spelling checking as fast as you can 
respond to the prompts, as does V2 of 
SpellBound. 

Here are some suggestions from a 


hardware designer who seems to know 
what he is talking about: 


1) The best way of making a go-faster 
QL is to design a (software) QL 
emulator to fit into an existing, fast 
computer, such as a Macintosh with 
a 68030 cpu. The trouble with this is 
that few QL owners would contem- 
plate spending several thousand 
pounds on a Mac to speed up QL 
programs (the suggestion was, 
being able “to run Quill four times as 
fast"), 

Produce a 68030 computer from 
scratch, with a rewritten QDOS, 
Much of the QL's activity relies on at 
least one other chip, apart from the 
cpu; the 8049 would have to be 
replaced, and its replacement might 
have to handle a larger share of the 
load. 


Design a hardware QL emulator, to 
fit on a PC card. This would also 
require a fair bit of new software. 
PCs are a lot cheaper than Macs, 
but they're not going to be fast at 
emulating the QL if they cost under a 
thousand pounds. 


2) 


2s 


There is already a good QL emulator 
running, on the Atari ST, and no doubt 
some readers have got this desirable 
combination. The fact that it doesn't 
appear to have sold in large quantities 
suggests the price (of ST plus emulator) is 
too high to tempt many QL users. The 
Thor XVI was basically a good try that 
went wrong for largely non-hardware 
reasons. Had this machine been marke- 
ted well, at a much lower price, it would 
have had a fair number of takers amongst 
existing QL owners. The impression given 
at the time was that CST was not 
interested in selling it to QL owners, and 
the price put it up against good PCs. 

Unless someone comes up with more 
than bright ideas for new hardware, the 
only way to get better performance seems 


Bryan Davies considers the hardware and 
software design options which could make 
the QL a faster machine. 


to lie in following the route already well- 
trodden on other computers — keep 
churning out the “accelerator” packages, 
both software and hardware. The Minerva 
rom has proved popular, and it gives 
speed improvements in certain areas, as 
does Lightning (on disk or rom), 

Ifthe programming experts now feel the 
screen is being handled as fast as is 
reasonable, what about looking at faster 
access to drives and memory? Is disk 
caching feasible, and worthwhile (bearing 
in mind the existing slave block activity)? 
Can the existing memory be cached 
(maybe only any add-on ram)? There 
seems to be a resurgence of interest in 
making the QL go faster (maybe memor- 
ies of the Futura project have faded), and 
an add-on board using a 68020 cpu has 
been demonstrated recently, showing a 
commendable turn of speed. That idea 
should be a relatively safe route, but 
others favour going straight to the fastest 
processor currently available in the 6800. 
series, the 68040. Whether or not the 
necessary hardware and software exper- 
tise to utilise these chips effectively is 
available in the QL world remains to be 
seen, but it does look likely that some 
hardware will be available during the next 
year or so to run existing programs at a 
much faster rate. 


International 


As a QL user, you are part of a very 
wide-spread community. Letters received 
in recent months include ones from New 
Zealand, the USA, Germany, Belize, Italy, 
County Down, as well as from Taunton in 
SW England to Edinburgh in Scotland, 
with a good sprinkling from places in- 
between, There are many clubs, of all 
types, around the world and the member- 
ship of many of them may be numbered 
only in hundreds. Our 10,000-plus active 
fraternity is healthy enough to keep going 
for a long while yet. You may have noted 
that the QL Users’ Group Quanta is now 
into its seventh year and membership is 
around 2,000 — as high as it has ever 
been. Itis still possible to talk about the QL 
to some of the people who have worked 
with it from early days, and are still 
involved with development of both hard- 
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ware and software for it. 

No doubt many users, and some ‘sup- 
pliers too, consider there is no new 
software of note needed for the QL, but 
that is debatable. There is still no inte- 
grated suite of utility programs available 
to handle all housekeeping tasks, on hard 
disk as well as cartridge and floppy. The 
lack of suitable routines for handling hard 
disk files can make setting-up a hard disk 
quite a chore. QPac is, perhaps, the best 
piece of QL software for handling such a 
task, but it is not so much a suite of 
programs as a concept that you buy with 
QPac, and that may not be what many 
users want. 


Stand-alone 


The kind of thing | am thinking of is a 
stand-alone package, that could be used 
with any existing system set-up, one that 
would allow the user to go simply, and 
quickly, to any hard disk sub-directory, 
see all the files listed, and perform normal 
Operations, such as Copy and Delete. It 
would be essential to be able to display a 
“tree” view of the directory structure. The 
present drive software for the Miracle 
hard disk makes it (for me) very confusing 
to find out what sub-directory you are in, 
and to navigate to another one. More 
commands are needed, such as Rename 
for sub-directories as well as files. 

While MS-DOS is far from being the be- 
all and end-all of operating systems, it 
would seem sensible to make present- 
day modifications to the QL operating 
system compatible with existing (and 
useful) MS-DOS functions. One program 
which might be expected to be very useful 
with hard disk is HardBack & Finder, by 
Chas Dillon, but it currently seems to be 
unavailable because of the troubles at 
PDQL. Hopefully, it will reappear before 
too long. A program which is available, 
and can tackle some aspects of hard disk 
housekeeping, is Files 2. With some 
modification, this program could do a 
competent job of handling most hard disk 
requirements; the writer is considering the 
project. 

Going back to the subject of a disk- 
caching routine, it may be that QDOS 
already performs part of this activity 
anyway, but the use of slave blocks, but it 
seems possible that hard (and maybe 
floppy) disk access could be speeded-up 
appreciably overall. The effect of a disk 
cache on a PC is tremendous, making a 
just-acceptable performer into a 
distinctly-fast one. 

The hard disk makes it difficult to live 


with weaknesses in software and hard- 
ware that one accepted previously. For 
example, we have had 896 KB of memory 
available for a year or two now, but no sign 
of more — leastways, not in a form that is 
trustworthy. Some users will not be too 
worried about lack of ram memory, but a 
Significant number must want more (if 
only to get away from frequent resets). 
The program-switching software currently 
available for the QL works only within the 
fram area, but some users now have 40 
MB of hard disk, onto which programs not 
currently being used could be switched. 
This concept has been used on the PC for 
about five years now and can transorm a 
basic 8086 machine into a genuine multi- 
tasking one. (To those who think this is not 
possible, | suggest reading-up on the 
Subject of expanded memory.) Task- 
switching (having only one task running, 
with others “frozen” in the background) is 
fairly straightforward, with basic hard- 
ware, but multi-tasking does require 
expanded memory. The QL always was in 
advance of the PC in respect of being able 
to handle several tasks concurrently. All it 
needs now is for that ability to be put on 
one side (do you use it?) and an effective 
task-switching program to be written that 
uses hard disk to store any applications 
programs which are currently not being 
used. 


Tactical link 


CGH Services advise that it is the QL 
Technical Review which has got to Issue 
3, not the QL Leisure Review, which is yet 
to be published (as of early July). Further 
modifications are being made to Fleet 
Tactical Command, including making it 
possible to link two computers via mod- 
ems, and to run the program on (IBM- 
compatible) PCs. Some minor bugs have 
been removed. The “alpha test” versions 
of an important new program from a well- 
known supplier look encouraging; the 
presence of several bugs is no surprise, 
given the scope and capability of the 
Program, and reported bugs are being 
fixed quickly. Having mentioned bugs, it 
might interest users who are unfamiliar 
with other computers to know that prog- 
tams which sell in the millions of copies 
(and cost several hundred pounds each) 
can have dozens of bugs in them, even 
after several upgrades. The PC WP. 
program with which | am most familiar 
certainly has dozens, but none of them 
cause me great problems. To some 
extent, the complexity and size of current 
programs make the presence of some 


bugs virtually inevitable. 

Making comments about printing from 
Quill seems to inspire readers to send in 
suggestions on the subject, which is the 
way we like it to be. If you didn't like the 
way of sending and ESC code to the 
printer mentioned in the August issue, 
here is another one to try, courtesy of 
Stephen Meech, Hold down the CTRL key 
and tap the ; key — this produces the 
CHR$(155) code. How your printer sees 
this may vary, but it is likely that an 
“Epson-compatible” printer will interpret 
this code as an ESC, after stripping the 
MSB (most-significant byte) from it. If you 
follow the 155 by the appropriate code(s) 
for the function you want, the printer 
should switch the function on. This will 
work from SuperBasic, or from within your 
word-processor (provided the CTRL; 
code is accepted). The QL User Guide 
shows decimal 155 as producing, on the 
screen, a u with a hat (circumflex accent) 
on top of it. If you follow that by -1 (dash 1) 
you will have the codes for turning 
underlining on. Likewise, CTRL; followed 
by M will give the code to switch Elite (12- 
pitch) characters on. I've not tried this in 
other programs yet, but it certainly works 
from The Editor. One negative aspect is 
that you have to put more codes onto the 
screen than you would if you used 
Translate functions, but the problem with 
Quill is that you may run short of Trans- 
lates, so this is a way of getting extra 
functions out of the printer when that 
situation occurs. You also have to remem- 
ber that, when non-printing codes are 
removed at print time, the following text 
moves a corresponding number of spa- 
ces to the left, which may upset spacing 
and justification, This technique for printer 
control is applicable when printing from 
Abacus also. 


Readers’ Letters 


J. Roy Goodall in Belize asks fora way 
of transferring Archive dbf files to-and- 
from the Psion Organiser. Has anyone got 
a way? J K Easlea asks if it is possible to 
alter QL Home Finance by Buzzz to make 
use of more than the basic 128 KB 
memory. H F Banks would like to know 
the present whereabouts of RSD Compo- 
nents, previously of Ware in Hertford- 
shire. Brian Hedge has offered to 
provide J S Hay with a working copy of the 
Rename routine from the January 1987 
QL World. 

Sector Software reports that a com- 
plaint from E Stocker concerning dam- 
aged goods has been dealt with. 
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What more can be said about PDQL? 
Some of the money owing to Miracle 
Systems has been paid to date; by the 
time this issue of QL World appears, the 
total debt should have been cleared, but 
apparently only because Court action was 
taken. | have received just one letter of 
complaint about PDQL in the past couple 
of weeks. No “letters of satisfaction” 
arrived from existing complainants. 
James Costello of New Jersey in the 
USA has not received PDQ-C six months 
after ordering it. He has spent almost as 
much as the program cost on making 
‘phone calls to PDQL, to no avail. A copy 
of HardBack & Finder promised to me by 
PDQL several weeks ago has not ma- 
terialised. 

Assurance has been received from TK 
Computerware that Turbo Quill and 
Turbo-Plus Quill are still available, from 
them, and will continue to be so in the 
foreseeable future. 


Keyboard Products report that there 
has been some delay in delivery of PS/2 
keyboards, due to redesign of the internal 
circuit board, but work has been comple- 
ted and deliveries should have been 
restarted by now. 

It is unusual to receive a complaint 
about a non-UK supplier, but D. Stewart 
says he has lost £195 which he sent to 
ABC Elektronic for one of their Mega Ram 
units. The unit was not supplied “due to 
technical problems”, and the proprietor of 


| 


the company seems to have moved on, 
leaving no forwarding address. The pro- 
ducts of ABC have been taken over by 
Jochen Merz, but he obviously cannot be 
expected to supply items for which the 
payment has gone elsewhere. 

Leon Heller has written to advise that 
MetaComCo ceased business some 
while back (the staff went off to do other 
things, rather than the company going 
broke), but Leon has managed to get a 
replacement for the missing MetaComCo 
C cartridge and has been good enough to 
send it to lvan Zorzin (see his plea in the 
July issue). Some of the MetaComCo 
staff joined companies working on pro- 
jects using Transputers, which have been 
one of Leon's main interest for the past 
few years. 

B.F. Boote asks for help with a disc 
fomatting problem. He has two 5 inch 
drives and a SuperQ interface, and one 
drive formats to only 720 sectors, 
whereas it (and the other drive) normally 
formatted to 1440 sectors. The drive has 
been checked and pronounced fit. Any 
ideas? David McKail has printing difficul- 
ties from his Thor, and is finding contact- 
ing Thor International difficult. He has 
Argos version 4.21 and XChange 3.90 — 
can any readers report experience of 
using these versions? 

A word of caution concerning making 
claims on credit card companies for 
products which have not been received. 
Before coming to the conclusion that the 


supplier from whom you ordered the 
goods never shipped them, leave adequ- 
ate time to allow for all reasonable 
eventualities in the delivery process, and 
then advise the supplier in writing that you 
wanta refund. It will take some time for the 
refund authorisation to be processed by 
the credit card company; if you contact 
them first, or soon after you complain to 
the supplier, you may get the impression 
that the credit card company then credits 
your account as a “goodwill gesture”, and 
that the supplier has not authorised the 
credit. As the credit card company will 
probably not say why credit has been 
given, you may never know that the 
supplier has “done the decent thing” 

All suppliers are not,by definition, bad. 
[tis unfortunate that SUB and PDQL have 
combined this year to give a poor 
impression of QL suppliers in general. 
Although there are some features of other 
suppliers which you may feel are not 
entirely praiseworthy, the well-known 
suppliers that remain on the scene have 
generally-good reputations, and have 
been around long enough for one to have 
reasonable confidence in them. Even 
when one is treated in some way that is 
felt to be unsatisfactory, it is desirable to 
bear in mind the almost daily reports in the 
newspapers of major companies leaving 
customers and suppliers in the lurch, with 
far greater losses than we are ever likely 
to sustain from orders for microcomputer 
goods. 


Single 3.5" Disc Drive & (Own PSU) 
Dual 3.5" Disc Drive & (Own PSU) 


QL SUPERTOOLKIT II by Tony Tebby 
Over 118 Commands:— Full Screen Editor, Key Define Print 


(103.508 sereons or parts of scr 


ha LT LT LT A LE ET ME ME 


TONY TEBBY SOFTWARE (QJUMP) 


QLFP (Micro/P disk interface upgrade) @E 14.980 
Using, Last Line Recall, Altkey, Job Control, File Handling, MON : te Prarie OPAC I 
pale sla pa OTYP Type/Spell Checker @ 29.084 — GPAC I Main menu windows adjust 
16k Eprom Cartridge Version «£ 24.18d QPAC 1-Desk top accessories, calender, alarm, calculator, automatically to size. Files, directory, 
Configurable Version an Mictodcive WE 24.154 typewriter, digital clock Sysmon. i @E 21.854 view, print, delete, backup, jobs, 
MIRACLE SYSTEMS PRODUCTS pick, Rjob, sort, channels, things, 
ZITASOFT SOFTWARE by Steve Jones exec, wake, buttons, Hotkey, Hot- 
Ok Disc Interface (inc Toolkit) WE 99.82 jobs’ Fully multitasking, allows 
AL Centronics Printer Interface iE 28.754 LOCKSMITHE copies M/DRIVE —M/DRIVE ne 14.950 Many programs to run at once 
OLExpanderam 512K Thrucard (@€ 99.99e 4MATTER + LOCKSMITH copies M/DRIVE—DISC...v£ 23,00c Requires min of 256k Crater 
The above programs are not far use in the UK. memory w b 
QL HARDWARE Upgrade QRAM to OPAC II return 


SIDEWINDER — High resolution printer driver prints full 
from postage stamp size to large 


master fw 29.900 


Upgrade to Text 87 V.3.00. Return old copy together 


£188,600 banners. Prints sideways, invert, scale, mirror, text insertion, ‘AS REVIEWED OL WORLD 
3.5°DS/DD Discs —10 off @E 9.206 WE 19.956 ‘AUGUST ISSUE 
© POWER REG. The anly real solution to your QL overheating ‘SIDEWINDER PLUS — (for expanded QL's) includes ali the 
(switched mode power supply run cold) GE 24.15c features of above, PLUS multiple label printing, desktop 
OL Keyboard Membrane (af 11.50d publishing files and printer driver for 24° pin plus LC10 and J» 
QEP Ii Advanced Eprom Programmer (@£121,906. @0 colour printers. (Plonse state 3.5" disc orM/D).... (i 28.000 
Care Eprom Cartridges each ‘if 5.75 Upgrade to Sidewinder PlUs..s.ass0 Gof 8.05¢ cA 
ULACHip 2x8301 18 .64e 
PRINTERS HEAT TRANSFER RIBBONS & PENS KA 
lle ic Tay ve G@E179.408 print your own T-shirt Design, Just print on paper andiron onto OPEN 
STARLC10Colour @£224.250 Prntyoure Iq roar i ta 
CITIZEN SWIFT 24-pin Colour : .@E366.600 YO" TAN 900, Rainbow @t/1728¢ 5pm Mon-Thu 
SOFTWARE 87 (State MDV or Disc) Star LCVONX1000, @t 19.506 9am-4pm Fri 
Epson FX80, MXB0, LXBO, FX100/ Okidata MLBO 
TEXTS7V.3.00 (@E_ 60,004 Citizen 20D/Star NX10, Black @e 11.606 
FOUNTEDBS GE 16,00 Small colour pen set. (ut Y2666 
FOUNTEXT 88 os (@€ 25.00¢ Jymbo§ Colour Pen Set. £ 16.106 
TEXT 87/FOUNTED 89/FOUNTEXT 88 @E 94.99b 
24G0PRINTER DRIVER Rom are 


800 ST ALBANS ROAD, 


a» ~& BB YB HY YH AI 


‘By Post. Enclose your Cheque/PO m 
ruse ACLESSIVISA Allow 7 dayalor delivery 


¢. 


‘B-way PCC 25-way 'D' (Printer-Ser 1) 


with : @£26.00d The QL drawing program 
by PROGS. Fully multitasking @e 3798¢ GARSTON, WATFORD, 
MONITORS (Price including lead) HERTS: WD2 EN 
Philips BM7522 Amber Hi-Res UTE READYMADE LEADS J a 
Philips CMB833 Colour Med-Res 252.008 TRO Tel: 0923-672102 
Philips AV7300 TV/tuner for above uw £ 69.00b to Phone Wt 8.76¢: ni 
Philips BN7502 Green Hi-Res £97.75 RGBESpINDIN ie 743 Fax: 0923-662304 
RGBE-7 pinDIN (Hitachi) GE 7.13 
HOW TO ORDE! ALLPRICESINCLUDE VAT —-RGBE-7pinDIN (Ferguson) GE 7130 Please add cariage 
Tae OTEK AGBE pinto SCART (Euro} He 11500: a=£11.50  D=3.45 


foe ‘9896 c=£1.88  d=£2.30 
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The Editor 

Open Channel 
Sinclair QL World 
Panini House 
116-120 Goswell Road 
London ECIV 70D 


Dear Editor, 


There has been a lot said 
recently, about what we 
should do when the supply 
of microdrive cassettes, 
already low, is finished. 
Personally, | gave up on 
@icrodrives along tise 
ago. I bought ay QL when 
the price was about £400 
and at least a quarter of 
the cassettes I purchased 
ran unsatisfactorily, for 
they could spin wildly 
out of control all night 
if I let them, without 
inputting anything at all 
into the Q1 itself. 


So after consideration, | 
purchased Cumana twin 3.5 
inch Disc Drives and 512k 
Expanderam extra meaory. 
The interface for Cumana 
fits into the Expanderam 
body, which fits into the 
left-hand end of the QL, 
using altogether only one 
of the OL ports, From day 
one I have had after this 
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27 HATHERLEY COURT 
HATHERLEY GROVE 
LONDON HZ SRD 


Doing away with micredrives 


installation (touch wood) 
evening after evening of 
trouble-free running. It 
was from a recommendation 
in QL WORLD some tise ago 
that 1 made ay choice, 


In a recent issue of "QL 
WORLD" such a set up was 
described as unsatisfact~ 
ory, because the Expand- 
eram unit with the Cugana 
interface hung so far out 
from the QL that it was 
unsafe, but I purchased a 
board from the hardware 
store, which was on sale 
for use as a ready-made 
shelf. I had no intention 
of course, of using it as 
a shelf, but as a resting 
place for ay QL, with its 
above-mentioned add-ons. 


The board is 900 x 200 cm 
(or 35.5 x 8 ins, approx), 
With supporting lengths 
of 20mm, square (finished 
size) wood under the over 


laps of the QL body, this 
is very convenient and 
the Disc Drives sit on 
it at right-angles, with 
the L. corner of my Taxan 
printer inside the angle, 


Special Editor, Cue Print 
and Spellbound multi-task 
conveniently on one disc. 
Abacus, Archive and Easel 
are contained on another, 
My disc with Professional 
Publisher has room for no 
further programses. Extra 
menory has now brought ay 
QL up to 640K, the sase 
as the IBN XT I use at ay 
office but Professional 
Publisher will still only 
run coafortably with no 
more than 4 of the fonts 
resident at any one tiee. 
This, however, 15 really 
not a great setback, for 
exchanging fonts is quite 
a fast, siaple operaton, 


To ae, ay GL ugraded to 


this extent compares very 
favourably with the IBN 
XT at the office, but the 
non-extractable hard disc 
used there mainly because 
of security reasons, is a 
cause of dissatisfaction. 
Because I am maybe biased 
in any case for the QL, I 
think working with hard 
discs isnot all it is 
made out to be, but I am 
not really a programeer, 


Abacus is not quite such 
a powerful instrument as 
Supercalc on the IBM. But 
Special Editor on the OL 
is more useful and faster 
than Word Perfect on the 
IBM in every day service. 


I would highly recoeaend 
an upgrade of this type, 
to do away with the worry 
of microdrives for ever, 


Kind regards, 


PC Tomlin 
Hatherley Grove 
London W2 
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MIRACLE 
SYSTEMS 


MASTERCARD =] 
ae 


See us at the 
EUROPEAN 
MICRO SHOW 


Eurovolley Centre, 
Beneluxlaan 22, 
1800 Vilvoorde, Brussels 
BELGIUM 


6th October, 1990 


Microdrive users - read this ... 


NEW TRUMP 
CARD 


£225 inc. (£198 export) 
RAM + Disk interface + firmware 


We have re-engineered the TRUMP CARD 768K to use the new 

1 Megabit DRAM memory chips, This new design runs about 20% 

faster (twice the speed of the QL's internal RAM) and uses less 

power than the previous one (still available in the 256K size). It 
holds the same firmware: 

+ TOOLKIT II which comprises more than 100 additions and 
enhancements to the QL's Superbasic and operating system 
including an on-screen alarm clock, wild card copying, 
accessing remote devices on other QLs equipped with a ROM- 
based TOOLKIT Ii via the network. 

* — aprinter buffer which can be used to buffer the serial ports (the 
size of which Is limited only by the amount of free memory) 
letting you get on with something else whilst the printer is 
printing. 

* a screen dump facility to copy all or part of the screen image 
to most types of dot-matrix printer including some colour ones. 

+ aRAMdisk that allows you to access the memory as you would 
Microdrives or floppy disks for fast file retrieval (please note 
that RAM disk contents are lost after switch-off or reset). 

* amemory cut that resets the QL to appear as an unexpanded 
128K type for the few early programs that refuse to run in 
expanded memory. 

‘The disk interface can access up to 4 disk drives (e.g. our DUAL 
3,5" plus our 5.25") and has the same commands as are used for 
Microdrive control. There is an additional command FLP_USE 
which can be used to di MDV accesses to FLP (the floppy 
disk interface device name). This makes the transferring of your 
software from unprotected Microdrive (i.e. the majority of QL 
software including Quill, Abacus, Archive and Easel) to disk a 
trivial task. A simple step-by-step guide for transferring Quill as an 
example is given in the comprehensive TRUMP CARD USER 
MANUAL supplied with the TRUMP CARD. 

The TRUMP CARD 768K's RAM adds to the QL's own 128K 
giving a total of 896K. Like the firmware the extra RAM is installed 
automatically when the QL is switched on so that no installation 
procedure is necessary. The exception to this is TOOLKIT II which 
can be left uninstalled for compatibility if you have other toolkits; 
installation consists of simply entering the command TK2_EXT. 

Fitting the TRUMP CARD 768K is easy - you remove the door 
at the left hand end of the QL and slide the TRUMP CARD into the 
expansion port. A “Beginners Guide” on pages 3 and 4 of the 
TRUMP CARD USER MANUAL will quickly get the novice and 
experienced user up and running. 


TRUMP CARD 
768K PACKAGE 


£375 inc. (£333 export) 


TRUMP CARD 768K + dual disk drive 
+10 diskettes 


This is the ideal upgrade path from obsolete Microdrives. 
The package comprises the latest TRUMP CARD 768K 
plus a QL standard floppy disk drive with 2 mechanisms 
plus ten 3.5" double-sided double-density diskettes. The 
only extra item required is the appropriate mains plug to 
suit the country where it is to be used. 

Disks are more reliable than Microdrives, hold much 
more information (720K after formatting) and are several 
times faster, Besides these advantages they actually cost 
less. Our QL DUAL DISK DRIVE is fully boxed in a black 
metal casing and is mains (220V-240V AC) powered. 

An EXPANDERAM 512K can be used as part payment 
against the TRUMP CARD 768K PACKAGE. Just send it 
to us together with £285 (£255 for overseas customers) 
remittance and we will send you the TRUMP CARD 768K 
PACKAGE. 

This package transforms the unexpanded QL into a very 
powerful machine and is very easy to fit. We are confident 
that you will find this investment more than worthwhile as 
many QL users have already done so. If you are not fully 
satisfied with your purchase then by returning it to us within 
14 days of receiving it we will return your money in full. 


When ordering by phone It Is sometimes easier to spell 
and addresses using the phonetic alphabet 


A- Alpha H - Hotel O- Oscar V - Victor 
B- Bravo 1- India P- Papa W - Whiskey 
C - Charlie J - Juliet Q- Quebec X- X-Ray 

D - Delta K- Kilo R - Romeo Y - Yankee 
E- Echo L- Lima S- Sierra Z-Zulu 
F-Foxtrot. M- Mike T-Tango 0-Zero 


N-November U - Uniform 


MIRACLE SYSTEMS Ltd 
25 Broughton Way, 
Sabaietee YO1 3BG, 

.K,. 
Tel: (0904) 423986 
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MIRACLE 


SYSTEMS 
—o-—=— 


HOUSE HOTEL 


20th & 21st October, 1990 


-See us at 


WINDSOR 


14 - 20 Windsor Road, 
Worthing, 
SUSSEX 


14 day money back guarantee on all products 
12 month warranty on all products 
UK prices include VAT and P&P 
(Export prices in brackets include P&P) 


QL HARD DISK 
£449 (£405) 


+ 40 MBytes of on-line storage 

+ About 5 times faster than floppy 

+t Fully cased complete unit 

Hard sub-directories 

# Head auto-park 

4 Plugs into QL ROM port 

% Through connector for ROM cart 

+ Fully compatible with TRUMP CARI 

We recommend that you consider purchasing the 
QL HARD DISK only if you have alrea 
upgraded to floppy disks (0.9. TRUMP CARD. 
PACKAGE) so that backing up is practical Ao 
the QL HARD DISK uses about 55K of RAM 
leaving litte room in an unexpanded Qt. for 
programs, 


QL 5.25" DISK DRIVE 
£125 (£114) 


fr 360K capacity 

‘Ideal for Conqueror 

 Through-con for dual 3.5" 
This complete unit can be retrofitted to a TRUMP 
CARD PACKAGE 80 that SolutiorvConqueror 

can read PC diskettes, We recommend that 

rodrive users upgrading to disks consider the 
‘QL-standard TRUMP CARD PACKAGE rather 
than the 5.25* drive. 


(Needs disk interface e.g. TRUMP CARD) 


Tel: (0904) 423986 


To place an order by phone please 
have your credit card ready. For 
overseas Customers we charge the 
prices shown in brackets. 


To order by post, please fill in the 
form opposite or write to us quoting 
your credit card number and expiry 
date, or enclosing a cheque payable 
to MIRACLE SYSTEMS Ltd 


Sinclair/QL World October 1990 


QL DISK ADAPTOR - £15 (£15) 
+f Access 4 drives from TRUMP CARD. 
+t Upgrade to latest TRUMP CARD ROM 
lg this np fhe orginal TRUMP CARD natal 
test ROM (included) and 
CARD can control up to 4 drive 
3.5" plus 5.25", 


QL CENTRONICS - £29 (£28) 

te SER1/SER2 to parallel printer 

# Standard Centronics plug 

# Defauit QL set-up 9600 baud 

t& 3 metre cable 
Connecting a printer to the OL. using this interface 
is not only simpler but is usually cheaper than 
buying @ serial card for your printer plus a serial 

‘wo interfaces will enable 2 printers to be 
driven simultaneously. 


QL DISK CARD - £100 (£89) 
x TRUMP CARD without RAM 
Full TOOLKIT Ii, etc. 
+ Controls up to 4 drives 


The DISK CARD is intended for use with an 
Internally expanded QL or with the EXPANDERAM, 


QL DISK CARD PACKAGE 
£250 (£224) 
DISK CARD Plus: 


‘ty DUAL 3.5", 720K DISK DRIVE 
tr 10 diskettes 


QL EXPANDERAM 512K 
£99 (£88) 
tr Increases OL RAM to 640K 
Through connector for diak interlace 
4 Plugs into the expansion pot 


Hf you already have a disk interface then the 
EXPANDERAM will slot in between the OL. and the 
\mortace, Programs running in the EXPANDERAM run 
‘about 1.75 times faster than those in internal memory 


QL DUAL 3.5" DISK DRIVE 
+t Fully cased complote unit 
+t OL-standard format 


£175 (£155) 


f 2% 720K diok drives. 
(Needs diak interlace e.g. TRUMP CARD) 


QL TRUMP CARD 256K 
£135 (£120) 
+t Incroasos OL RAM to 384K 
+t Controe up 10 two drives 
+t Toolkit Il, ot. 
+ Can be expanded to 612K of 768K 


Please note that we otter neither the parts nor the 
‘service for expansion. 
QL TRUMP CARD 256K 
PACKAGE - £285 (£255) 


‘TRUMP CARD 256K plus - 


te Dual 3.5", 720K disk drive 
‘te 10 diskettes 


Please send me 


ee 
To: MIRACLE SYSTEMS Ltd, 25 Broughton Way, Osbaldwick, 
York, YO1 3BG, U.K. Tel: (0904) 423986 


! enclose a cheque to the value of: £ 


l 
| 
| 
| | 
| | 
| Or debit credit card | 
| | 
| expires V | 
Name Signature 
| Address | 
| | 
eae ae IS eaoeey st 
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Mike Lloyd 
answers questions 
about the Digital 
Precision PC 
emulator 


Q. Instead of buying an expensive PC, can 
Luse PC Conqueror and my QL torun MS- 
DOS software? 


A. Yesyoucan, because PC Conqueror is 
a powerful PC emulator which can cope 
with most programs available on the PC 
However, there are some practi- 
tions which should be considered 
before making your decision. 

PC Conqueror is a program which 
convinces MS-DOS that it is running on an 
Intel 8088 central processor (the processor 
family used by all PCs) when it is actually 
running on an entirely different cpu from 
the Motorola M68000 family, This is a 
remarkable feat, but it i 
plished at a speed which is somewhat less 
than that of a low-specification PC compu- 
ter. 

Additionally, there are a few MS-DOS 
programs which do things which are not 
yet supported by PC-Conqueror. Version 
6 of Central Point's PC Tools program is a 
case in point. Standard packages such as 
Plan Perfect and Microsoft Word should 
not have any problems running on the QL. 

It is worth pointing out the obvious: 
without a hard disk drive and considerable 
extra memory a QL is not going to be able 
to emulate a PC with a hard disk and 640K 
of DOS memory. 

Realistically, it is probably asking too 
much of your QL and of Conqueror to 
think that between them they could save 
you the cost of a PC for regular and 
frequent use. The QL is too slow and 
Conqueror is performing too complex a 
task for the combination to offer a serious 
competition to a true PC machine. If it is 
any consolation, similar PC emulators for 
the Atari 520 and the Apple Macintosh 
computers are also slow. 

Conqueror is of most value to people 
who (for instance) use MS-DOS compu- 
ters at work and need to carry on working 
in DOS when they arrive at home. Others 
might value learning about the the DOS 
environment on the QL before plunging 
into the PC market. Open University 
students who must have access to an MS- 
DOS computer for part of their course are 
buying PC Conqueror. If you already own 
a QL with at least one disk drive and 
expanded memory, the additional cost of 
PC Conqueror is well worth considering. 
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Microsoft MS-DOS, 


If you are planning to build up a suitable 
system from scratch the total cost will not 
be justified if all you want to do is run 
DOS programs. 

PC Conqueror is much faster on the 
Atari 520 QL emulator (where an Atari is 
convinced it is a QL which is convinced it 
isa PC. . .) and on the Thor derivative of 
the QL. There is the chance that a 
hardware manufacturer will market a fast 
replacement for the QL cpu. Any increase 
in the cpu’s performance is going to 
benefit PC Conqueror quite substantially, 
thus making it more practical to use 


Q. Can you recommend a word processor 
to use with PC Conqueror? 


Tf you are a competent typist used to the 
complexities of WordStar, WordPerfect 
and so on you will find the same programs 
running under PC Conqueror quite slow. 
You will also need to be selective in the 
number of program files you put on the 
“system” floppy disk if you do not have a 
hard disk fitted to your QL. It is also 
beneficial to use Conqueror’s “supervisor 
screen” to increase the priority of the 
screen-updating program. This ensures 
that the screen keeps up to date with 
moderately fast typing. 

Speed is less an issue for “hunt-and- 
peck” typists, who might also prefer a less 


dauntingly complicated oes sor 
than Word Perfect or Word. Typists who 
complained that the jerky cursor move- 
ments of Digital Precision's Solution were 
offputting will be impressed by the smooth 
and regular screen updating which PC 
Conqueror provides. 

For most people, the choice of word- 
processor will be the same as that they are 
used to on the PC they use at work. PC 
Conqueror includes a very useful utility 
called “Xover” which transfers files from 
DOS format to QDOS format and vice 
versa, You can therefore bring work home 
in a DOS file, transfer the file to QDOS 
using Xover, work on it using a QDOS 
wordprocessor such as fext 87 or The 
Editor, and transfer it back again to DOS 
format for final tidying up using the 
wordprocessing package used by your 
company. 

This is not quite as easy it seems because 
the control codes used to produce features 
such as underlining and italics in one 
package are not going to be the same as 
the control codes adopted by another 
program. With The Editor, of course, 
there is some latitude for tuning it to 
emulate the DOS program which will 
eventually handle the text files it pro- 
duces. 

With other QDOS-based wordproces- 
sors it is quite workable to avoid all 
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PC CONQUEROR J | 
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control codes while drafting the document 
and insert them after the text has been 
transferred to the DOS package following 
its conversion using Xover 

If you particularly want to own a DOS 
wordprocessor but do not wish to spend a 
great deal of money on one, there are 
some excellent shareware programs which 
can be obtained for a few pounds. 


Q. I have loaded Word Perfect 
fully but many of the func 
be jumbled up. For instance, F7 ought to 
allow me to quit Word Perfect but instead 
it calls the “search” function. What can I 
do? 


The reader who asked this question owns 
a Sandy keyboard with an additional 
d and ten function keys. 
She made the logical assumption that F7 
on the keyboard would be read as F7 by 
the program she was using. However, the 
standard QL only has five function key 
On the Sandy keyboard the keys marked 
F6 to F10 are actually used to represent 
Shift-F1 to Shift-F5. Therefore pressing 
F7 on the Sandy keyboard is the same as 
pressing Shift-F2 on a PC keyboard 
Which begs the question, where is the 
real F7? Steve Sutton, the programmer 
who devised PC Conqueror, had a diffi- 
cult problem on his hands because the 


normal QL keyboard has considerably 
fewer keys than the 102-key PC-AT 
keyboard which MS-DOS programs 
assume to exist. Sutton could not make 
the assumption that all PC Conqueror 
users would use the Sandy, Schon or other 
replacement keyboards and so he had to 
devise a solution which was workable on 
standard QL keyboards. 

By clever mapping of most of the 
expected DOS keypresses to sensible 
equivalents available to the QL, Sutton 
has made it quite easy to use all the DOS 

eystrokes, For example, the “missing” 
ys F6 to F10 are found by 
pressing Ctrl-6 to Ctrl-10, and so the F7 
Which Word Perfect requires before enter- 
ing the exit sequence if obtained by 
pressing Ctrl-7, 

As the PC Conqueror manual states, 
the default key mapping the file can be 
improved upon for QL owners with 
additional keyboards, but it is left to them 
two work out the best method of re- 
arranging the keypresses to suit their own 
particular needs. PC Conqueror includes 
a configuration utility which simplifies the 
construction of an alternative key- 
mapping file. 

A quick improvement can be obtained 
by specifying that Shift 1F- to Shift-F5 on 
the OL (ie the F6 to F10 keys on the Sandy 
keyboard) become F6 to F10 within PC 
Conqueror, Ctrl-1 to Ct can be used to 
represent Shift-Fl to F10 in MS- 
DOS programs. Further refinement 
depends upon the selection of extended 
keypresses (ie those involving Shift, Alt 
and Ctrl) which feature in the MS-DOS 
software you intend to use on the QL. 


Q. Thave tried to use Psion Xchange’s task 
switching feature but without succe: 
Why does the QL not support this? 


A. Actually, the QL and PC-Conqueror 
do support this feature, which is found on 
quite a few MS-DOS programs apart from 
the Xchange suite. To call it “task switch- 
ing", however, is misleading. What 
actually happens is that at the moment 
that the user selects to switch from one 
Psion program to another the computer 
records a “snapshot” of the current state 
of the current application and saves it ona 
disk. When it is time to restore the 
interrupted program the contents of the 
application file plus the program which 
created it must be restored to the com- 
puter’s ram. This is incredibly crude 
compared with the sophistication of the 
QL’s genuine multi-tasking environment 
and is one major reason why my 386 PC 
regularly sits silently while T use my QL, 

The reader's problem was that the disk 
‘ed in the “A” drive had insufficient 
space to hold the snapshot of his current 
application so Xchange could not start up 
another program without losing all record 
of the first one. This it sportingly refused 
to do. 

The solution is to create a disk contain- 
ing all of the program overlays and 


nothing else. If you can live without the 
exclude the *. HOB help files. The 
will then have plenty of room to store a 
number of suspended applications. More 
permanent data files can then be stored on 
other disks. It is then simply a question of 
remembering to swap disks prior to 
loading or saving a data file. 


Q. The DOS network I use at work 
suffered from a virus. Will my QL be 
affected if I bring home possibly contamin- 
ated spreadsheet files? 


A. Computers with hard disks are most 
vulnerable to virus programs because hard 
disks are where viruses hide to avoid being 
destroyed by a system reset. In fact, a QL 
without a hard disk is an ideal place to test 
any suspicious MS-DOS disks for the 
presence of a virus because you can be 
absolutely sure that the contamination 
will go no further. 

In order to test for a virus you will need 
a specially-written virus-detection prog- 
ram, versions of which are now in the 
public domain and thus can be obtained 
very cheaply, Only insert the disk being 
tested before resetting the QL to destroy 
any virus which might be lurking in its 
ram. One thing you can be certain of: 
there is no PC virus which can exist in the 
QDOS environment. 


Q. I want to use Autoroute on the QL, 
but it exceeds one megabyte in size. Can it 
be done? 


A. Autoroute is a program which selects 
road routes from one town to another. 
Like most DOS software it is not one file 
but many, so the trick is to select those 
files which are essential and discard those 
which are not in order to fit the program 
onto a single disk. The essential Auto- 
route datafiles cannot all be fitted onto a 
single 720Kb floppy disk. By splitting the 
les which make up Autoroute onto two 
disks, however, it is perfectly feasible to 
run the program on the QL. For a two- 
disk set-up, simply place both Autoroute 
disks in the drives and start the program 
from the drive containing the disk which 
has the batch file called “route” on it. For 
a single-disk system, place the disk with 
“route” on it in the drive and wait until the 
screen shows a prompt “Place Disk 1 in 
Drive B”. At this stage, replace the 
Autoroute boot disk with the second disk 
and press any key to continue. But be 
warned, David Batty of Sector Software 
reports that a QL needs the largest 
Trumpcard expansion available in order 
to run Autoroute. 


Readers may wish to write in with their tips 
for using Conqueror, including listings for 
keymapping files appropriate to different 
keyboards or different Dos programs.+ 
Address your letters to the Editor, Sinclair 
QL World using the address at the front of 
the magazine. Listings should be printed in 
clear, dark type. 
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Robin Stevenson 
raids earlier 
episodes and adds 
some new 
routines. 


or the last of my articles on the 

potential of the Archive prog- 

ramming language, a slightly 

different approach will be taken 
from previously. None of the new proce- 
dures will be directly portable, in the way 
the other toolkit procedures are, This is 
because a rather more complex task is to 
be accomplished. However, the core 
procedures are specifically designed to 
be as independent as possible from the 
particular application, so that they can be 
readily re-applied to other similar situa- 
tions. 

The problem we shall be tackling is the 
list. The requirement will be familiar to 
many users. You want to be able to 
browse down a list of entry lines, with a 
reasonable screen-full in view, but with a 
variable number of entries, which can be 
scrolled down or up when you reach the 
top or bottom of the screen. The Archive 
program editor is one good example of the 
genre, but it is also a regular requirement 
of a database file. Finding the correct 
record is very much easier this way than if 
you can only see one record ata time. And 
if you need to check through a number of 
records, altering cerain ones, a list pro- 
vides a very much more natural way to do 
it. 

Unfortunately getting Archive to handle 
records in this way is far from straightfor- 
ward, Rather like a dog walking on its hind 
legs, it can do it, but it doesn't come 
naturally. The solution offered here is 
something of a compromise; a trade off 
between speed of use, compactness of 
code, and features provided. If you apply 
it to a requirement of your own you may 
need to alter that balance, to sult the jobin 
hand. 

The application is a composite to-do list 
and appointments diary. This is not quite 
such a strange union as first may be 
thought. The idea is that entries can be 
either dated (appointments) or undated — 
things to do, for which you have no 
specific date, In use, you will get a list of 
the entries for a particular day, and if the 
day you look at is today (as defined by the 
system clock) you will also get the list of 
the undated entries, in order of priority. 
You can readily make a mental or physical 
plan for the day. It could make you more 
organised, efficient, dynamic — well, you 
never know. 

The various elements needed for a 
working list can be grouped into three 
heads — data, display, and control. If we 
look at control first, the guaranteed needs 
will be to step up and down the list, and to 
exit from it. (Other actions will depend on 


ARCHIVE POWERIV 


Listing One. Add this to the existing toolkit procedures, saving it 
as a new program called TODOLIST. (See text for further details.) 


proc LISTINIT : rem INITIALISE LIST VARTABLES 
let LISTWINDOW$=chr (20)+chr(2)+chr(5)+ehr (78)+chr (20) 
let TEXTWINDOW$=chr(20)4chr(0)4chr(20)4chr(80)+chr (24) 
let CURRENT$=date(0): let REDRAW=2 
endproc 


proc LIST : rem MAIN CONTROL PROCEDURE FOR ANY LIST PROGRAM 
local KEY$,MAX,LNUM,MOVED,LOOP,COLOUR,L$ 
LISTINIT 
let KEY$="E"+chr(2)+chr(3)+"AUD"s let MAX=14 
Jet LOOP=1: while LOOP : rem #HwH START OF MAIN LOOP 
if REDRAW:LTSTDRAW: let REDRAW: let LNUM=0 : rem DRAW SCREEN 
else :LISTLINE;LNUM: print ANSWER$;: endif : rem OR LINE 
Jet L$=ANSWER$: let MOVED=0: let COLOUR=3+(DATE$<>"") 
let LOOP=instr(KEY$,inkey()): if LOOP: let LOOP=LOOP-1 
else :LISTTEXT;KEY$: let LOOP=ANSWER: endif : rem GET OPTION 
if LOOP>2:LISTOPTIONS;LOOP: endif rem DEAL WITH SELECTION 
if LOOP=1 and recnum()>0: let MOVED=-1: back : endif 
if LOOP=2 and recnum()+I<count(): let MOVED=1: next : endif 
print LISTWINDOW$; ink COLOUR;L$; : rem LOWLIGHT OLD LINE 
if LNUM+MOVED<O: print chr(22)4+chr(1);: else : rem SCROLL DOWN 
if LNUM+MOVED>MAX: print chr(21)+chr(1); : rem SCROLL UP 


else : let LNUM=LNUM¥MOVED: endif : endif : rem MOVE LINE 
endwhile 2 rem *#eReEHH END OF MAIN LOOP 
endproc 


proc LISTTEXT;K$ 
local T$: print TEXTWINDOW$: screen ; rem WINDOW ON LAST 4 LINES 


+ rem DLSPLAY TEXT AND MENU 


if count(): sprint : endif 
let T$=chr(190)+chr (191) 


+ rem SHOW CURRENT ENTRY 
: rem MAKE MENU REQUEST 


GETCHOICE;"Exit "+T$+" Actions Undo/Do Dates",5,k$ 
endproe 
proc LISTLINE5LINE rem MAKE SINGLE LINE FOR LIST ENTRY 


if count()>0 
let ANSWER$=chr(25)+chr(3)+PRIORTTY$+ohr (9)4chr(1)+":"" 


+ rem IF THE LIST 1S NOT EMPTY 


Jet ANSWER$=cl 


r( 31) +chr(0)+chr (LINE) +ANSWERS 


let ANSWER$=ANSWER$S+TEXT$+chr (9)+chr(75)+DONE$ 
let ANSWER$=": endif 


else : 


proc LISTDRAW rem DRAW FULL LIST FROM SCRATCH 
DATEFORMAT;CURRENT$: print HEADINGS 
if CURRENT$=date(0): let ANSWER$S=ANSWER$+" *#TODAY**": endif 
print at 4,0; ink 0; paper 4;" ";ANSWER$; tab 75;LISTWINDOW$ 
cls : if REDRAW=2: reset : order DAYS;D,PRIORITY$;A 
if CURRENT$<=date(): select DAYS<=days (CURRENTS) 
else : select DAYS=days(CURRENT$): endif : endif 
last : while recnum()>0 : rem LOOP TO PRINT EACH LINE 
LISTLINE;0: print ink 3+(DATE$<>"") ;ANSWER$;chr(22)+chr(1) 5 


back + endwhile : rem END OF PRINT LOOP 
LISTLINE;0: print ANSWERS; + rem PRINT TOP LINE. 
endproc 


rem HANDLE OPTIONS 3,4 & 5 OF MAIN MENU 


proc LISTOPTIONS;OPT 
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proc TODOFILE;M$,F$ 


proc TODOCLEAR 


proc TODOACT 


local 1$,P: if OPT=3: error TODOACT: return : endif 
if OPT=4: let DONE$="-X"((DONE$="-")+1): update : else 
let T$2"Exit Next Previous Forward" 2 rem DATE OPTIONS 
GETCHOICE;T$+" Back Date Today",6,"ENPFBDT" 
if ANSWER=0: return ; endif : let T$=CURRENT$: let P=recnum() 
if ANSWER<3: let YES=1: reset : order DAYS;D,PRIORITY$;A 
locate days(CURRENT$) -(ANSWER=2) + rem PREVIOUS ENTRY 
if ANSWER=1: back : endif = rem NEXT ENTRY 
if DATE$<>"": let ANSWER$=DATE$ : IF NO ENTRY FOUND 
else : let ANSWER$=date(0): endif : endif : rem GOTO TODAY 
if ANSWER=3 or ANSWER=4 : rem FORWARD OR BACK ONF DAY 
DATE ;days(CURRENT$)+(ANSWER=3)-(ANSWER=4): let YES=l: endif 
if ANSWER=5 + Tem ENTER A GIVEN DATF TO GO TO 
GETSTRING;"Enter Required date" ,"" 
error DATECHECK;ANSWER$: endif : rem CHECK IT'S VALID 
if ANSWER=6: let ANSWER$=date(Q): let YES=1: endif 
if YES: let CURRENT$=ANSWER$: endif : rem UPDATE CURRENT DATE 
if T$<CURRENT$: let REDRAW=2: else : position P: endif 
endif 
endproc 


proc TODOLIST 


= rem STARTS THE TODOLIST PROGRAM 
# rem FILE & SCREEN 
$ rem RUN THE LIST PROCEDURE 

+ rem CHECK ALL IS TIDY 


error TODOCLEAR: screen ; sload "TODOLIST" 
error LIST 
error SHUT;"" 


rem OPEN OR CREATE REQUIRED LIST FILE 


local T$: error FOPEN;M$,F$ + rem FIRST TRY TO OPEN IT 
if YES: return : endif. 
let T$=ANSWERS+" not found : " + rem OFFER TO CREATE NEW ONE 


GETCHOICE ; T$+"0. Abandon 2. Create file",2,"ARC" 

if ANSWER=0: error : endif. + rem ERROR .TO ABANDON, 

if ANSWER$=1:TODOFILE;M$,F$: return : endif + rem RETRY 

create ANSWER$ logical FS + rem OR CREATE NEW ONE 
DATES : rem OPTIONAL DATED ENTRY 
DAYS : rem NUMERIC DATE, FOR ORDERING 


1. Retry 


PRIORITY$ : rem OPTIONAL PRIORITY FOR ORDERING 
DONES$ + rem FLAG TO MARK AS DONE 
TEXTS t rem MAIN LIST TEXT FIELD 
endereate 

endpr 


+ rem GET TODOLIST FILE, & CLEAR OLD ENTRIES 
TODOF ILE; "Enter filename for To Do List", "TODOLIST" 
Jet TFILE$=ANSWER$: order DAYS;D,PRIORITY$;A = rem ENSURE ORDER 


TODOFILE;"File Is "+TFILE$+" HST", "HIST" — : rem GET HIST. FILE 
CENPRINT;2,"CLEARING FILE": use "TODOLIST": last 
while DATE$<date(0) and reenum()>0 and Jower (inkey())<>"q" 
if DAYS>O or DONE$="x" : rem IF OUT OF DATE, OR DONE 
let HIST.DATE$=DATE$: let HIST.DAYS=DAYS + rem COPY ACCROSS 
let HIST.PRIORITY$=PRIORITY$: let HIST. TEXT$=TEXTS 
let HIST.DONE$=date(Q): append "HIST" + rem AND APPEND 
use "TODOLTST": delete = rem BEFORE DELETING OLD ONE 
else : back : endif 
endwhile 
error SHUT;"HIST": use "TODOLIST" 
endproc 


rem PROCESS THE TODO ACTIONS REQUEST 
1. File 2. Insert" 

GETCHOICE;T$+" 3. Alter 4, Print 5. Delete",5,"EF LAPD" 

let C=ANSWER 


local T$: let T$="0. Exit 


At: TODOCLEAR: endif = rem CHANGE TO A DIFFERENT LIST FILE 
if) Ca2 ; rem INITIALISE A NEW LIST ENTRY 
let DATE$=""; let DAYS=0: let PRIORITY$: let DONE$="-" 
let TEXT$=""; let REDRAW=1: append : endif 


if C=2 or (C=3 and count()): print HEADING$; : rem INSERT/ ALTER 


= 


the particular application.) The data can 
‘be similarly straightforward — the list can 
be any Archive file. By using the SELECT 
statement, a part of a file can be used. 
One selected it behaves exactly like an 
entire file. 

As far as the list is concerned the whole 
file is available to it, while each application 
must define which fields are to be used in 
the one line display of data. The list will 
have to be drawn completely in a number 
of circumstances: at the start; whenever a 
different list is selected; and if the screen 
is used for something else. Individual 
lines will need to be highlighted, to show 
the current line, and if you move beyond 
the top or bottom of the screen, it must be 
scrolled accordingly, before writing the 
new line, 

The procedures in Listing One perform 
three various functions for the To-do list. 
They can be divided into two types. 
Firstly, there are those called LIST some- 
thing. These would all be needed In some 
form (modified to suit the application) by 
any list. They contain most of the ele- 
ments mentioned above. Then there are 
those called TODO something. These 
perform tasks much more specific to the 
To-do list. They may well have direct 
parallels in other applications — file 
creation, printing, etc. — but they are not 
essential to the list concept. 

The listing does not provide a complete 
program in itself. It builds on a number of 
toolkit procedures developed over the last 
three months, Unfortunately the required 
procedures are spread over the NOTE- 
PAD and CALENDAR programs, so 
unless you have bags of memory, and are 
adding all the programs in together, you 
will need to extract them to create a new 
TODOLIST program. From the NOTE- 
PAD program you will need CALC- 
SETUP, CALCULATOR, CENPRINT, 
CONFIRM, FOPEN, GETCHOICE, GET- 
SINPUT, GETSTRING, PRINTOFF, 
SHUT, SPOL, and WINDOW. Delete all 
the other Notepad procedures, and then 
save those procedures as TODOLIST. To 
these, you will need to add the three date 


handling procedures from CALENDAR... 


These are DATE, DATECHECK, and 
DATEFORMAT. Delete all the other 
calendar functions and then merge in the 
other procedures by typing in the com- 
mand MERGE “TOODOLIST". The file 
can then be again saved as TODOLIST, 
and is ready to have the LIST procedures 
added to it. 

Users of last month's calendar program 
will have noticed a reliance on the QL 
system clock, to determine today's date. 
This dependence is even greater inthe To 
Do list. If the program is to automatically 
Prune out old appointments, and thinks 
the year is 2027 or some such, you will 
find you have a remarkably empty 
appointments book. Unfortunately there 
is no provision within Archive for altering 
the clock. It must be set from SuperBasic 
before Archive is called. Unless you 
happen to have a fancy battery backed 
clock in your QL, the best way to do this is 
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al 


print TEXTWINDOW$;: screen = 


alter : 


if C=4: TODOPRINT 


let REDRAW=2: endif 


endproc 


proc TODOPRINT 


order DAYS;D,PRIORLTY$;4 


while not instr(" ,.-)23", 
if len(DONE$)=10 


next = endwhile 


endpro 


START 
error TODOLTST 

run object "NOTEPAD" 
endproc 


pri 


to incorporate a routine into the Archive 
BOOT file. You will need to renumber it, 
so that extra lines can be inserted before 
the call to exec Archive. For those who 
have not yet written their own, | offer the 
following 


50 INPUT ‘Enter da) 


";d$,'Month : 


'sm$,'Year : 'y$,’ 
60 INPUT 'Time Hours: ';h$,'Minutes : 
‘imn$ 


70 IF LEN(y$)=2:y$="19' +y$ 
80 SDATE 0&y$,0&m$,0&d$,0&hS, 
0&mn$,0 


This has the advantage that if you are 
sure you won't be needing it, you can flick 
past with five rapid Enters. While dealing 
with BOOT, | shall repeat something 
discussed in an earlier article. If you have 
found insufficient memory for these prog- 
rams, replace the exec__w line in the boot 
program, with NEW. This will clear out all 
superbasic and variables (but won't reset 
the clock), and give you a couple more 
kilobytes. You will then need to type 


CENPRINT;2,"Enter new Date, Priority, and Text." 
sprint 
let T$=CURRENT$: let P$=PRIORITY$ 
if T$<>DATE$: error DATECHECK;DATE$ 
let DATE$=ANSWERS$: if ANSWER$<>""': let DAYS=days( ANSWERS) 
else : let ANSWER$=date(O): endif 
update : let CURRENT$=ANSWER$: endif 
if P$OPRIORITY$: let REDRAW=1: endif 
if T$¢OCURRENT$: let REDRAW=2: endif : endif : rem OR THE DATE 


error FOPEN;"File Is "+TFILE$,"TODOLIST": error PRINTOFF 


if C=5 and count(): delete ; let REDRAW=1: 


local D$,X, INDENT: let D$=TFILE$ 


GETCHOICE;"PRINT ; 1. Old 2. Current 3, Todays",3,"FOCT" 
if ANSWER=1: let D$=D$+" HST": endif 
error FOPEN;"File Is "+D$,"TODOLIST" 2 rem CHECK FILE 1S OPEN 


if ANSWER=3: locate days(date(0)) 
SPOOL: let D$=""; while not eof() : rem ***#** MAIN PRINT LOOP 
if D$<ODATE$: if DAYS=0: let ANSWER$="UNDATED ENTRIES" 
else :DATEFORMAT;DATE$: endif : Iprint : rem SUB-HEADING 
Iprint tab MARGINSANSWER$: let D$=DATE$: endif 
let INDENT=2: while len(TEXT$)>60: let x=60 
TEXT$(X)): let X=X-1: endwhile 
Iprint tab MARGIN+INDENT;TEXT$( to X)z let TNDENT=4 
let TEXT$=TEXTS(X+1 to ): endwhile 
Iprint tab MARGIN+INDENT;TEXT$ 


Iprint tab MARGINC4O; "Archived : 
2 rem ***## END OF MAIN PRINT LOOP 


rem LINK IT IN WITH MAIN DESKTOP PROGRAM 


: rem IS THE ORDER DIFF 


endif 


: rem CHECK IT TS IN ORDER 


: endif + rem START AT TODAY 


= rem FORMAT LOOP 


: rem END OF FORMAT LOOP 


"SDONE$: endif 


: rem CALL THE APPLICATION 
: rem & RETURN TO NOTEPAD 


manually the instruction EXEC_W 
MDV1_ARCHIVE. 

We shall no look at the general list 
procedures, starting with LISTINIT. This 
initialises four new global variables, for 
use by LIST, Two of these are in effect 
constants, for sizing the two windows 
used. Storing them as string variables in 
this way allows greater speed than calling 
the WINDOW toolkit procedure, and also 
makes it easier to change the window size 
than having to find each entry in the 
program. Remember also that the HEAD- 
INGS constant, initialised by the 
DESKTOP initialisation program, also 
contains a window size — the full screen 
area — so LIST can quickly use any of 
these three window areas. There are also 
two true global variables in the LISTINIT 
procedure — REDRAW, and CUR- 
RENTS. Redrawis a flag to show whether 
the screen needs redrawing or not, and 
Currents is used to control the selection of 
the required records. In our case it holds 
the date currently being looked at. 

LIST is the main control procedure 
for the program. It controls list display, 
menu requests, movement around the 


list, and access to other options. The only 
one of these it handles directly is move- 
ment around the list. All of the others are 
subcontracted to other procedures, mak- 
ing LIST a concise and hopefully under- 
standable procedure. The four elements 
are dealt with by the procedure in turn. 


LIST 


First, the screen display. If the RED- 
RAW flag has been set, LISTDRAW re- 
draws the entire screen, otherwise LIST- 
LINE highlights the current line. Next the 
keyboard is checked. If a valid response is 
already entered, it is acted on directly, 
otherwise LISTTEXT provides a full 
menu, Much faster movement around the 
list is possible than if the response was 
entirely in the hands of LISTTEXT. If the 
request is not one of Up, Down, or Exit, it 
is simply passed on to LISTOPTIONS. 
Movement up or down the list requires 
checking that there is another record to 
move to, and then whether or not the 
screen needs scrolling or the line number 
moving. 

Seven local variables are required to 
service these functions. The first two are 
constant which help with portability — 
KEYS Is a string of the allowable input 
letters, and should match the initials used 
in the LISTTEXT menu. MAX is the 
maximum number of lines available in the 
LISTWINDOWS$ window, so any changes 
in the window size would need a compa- 
rable change to MAX. The next three are 
control variables — LNUM for the current 
screen line number, MOVED for the 
direction moved along the list, and LOOP 
for the user response and WHILE LOOP. 
control 


Portability 


Finally, there are two display line 
variables — L$ stores the highlighted line, 
so that once another line is found, it can 
be ‘lowlighted' before highlighting the new 
one. Finally COLOUR is the one applica- 
tion specific feature of the procedure. 
Date entries are to be green, and undated 
entries red in the To Do list, with the 
highlighted line white. COLOUR stores 
the colour to return it to, after moving on. 

And so on to the LIST support proce- 
dures. There are four of these. They all 
perform functions essential to any list, but 
the details of each will be specific to the 
particular application. 


LISTTEXT;<s.exp> 

Whenever nothing else is being done 
with the list, it uses its time providing 
helpful Information to the user. This falls 
into two parts — information about the 
current line, and a menu of the available 
options. The first of these is a standard 
Archive screen, placed in a window at the 
bottom. Figure One shows the screen 
you will require. It is also used as the data 
entry screen, when inserting or amending 
items. The menu is then provided via the 
toolkit procedure — GETCHOICE. To 
ensure agreement between the keypress 
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options of LISTTEXT and LIST, the KEY$ 
variable is passed as a parameter to 
LISTTEXT, and from there to GET- 
CHOICE. 

GETCHOICE itself may require a 
second look here. The problem is the 
online calculator, which relies on a SEDIT 
screen variable called ANSWERS being 
in the menu area. TODOLIST uses a 
smaller screen, windowed at the bottom 
of the QL screen, so cannot provide this 
sérvice. To make the calculator usable 
you will need to customise GETCHOICE 
so that it loads the NOTEPAD screen 
before running the calculator, and reloads 
the TODOLIST screen after use. Find the 
line the call CALCULATOR, and add the 
two comamnds, so that it reads ‘sload 


“NOTEPAD’ 
“TODOLIS 


ror CALCULATOR: sload 


LISTLINE; «n.exp» 

One of the benefits of the Archive 
screen driver is the ability to combine 
printed material and control instructions in 
asingle string variable, for use elsewhere. 
LISTLINE makes use of this to write a line 
of the list. It is needed by both the main 
LIST procedure, and when drawing a list 
from scratch. In particular it needs to be 
highlighted, when itis the current line, and 
lowlighted again afterwards. LISTLINE 
provides the line of text, with embedded 
Start point (provided as a parameter) and 
tabulation instructions, to give a tidy, 
organised list. An additional screen driver 
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The 3 variables are OATES, PRIORITYS, AND TEXTS. 
The double line of TEXTS is obtained by extending the first line of dots 

to the edge, using the right-arrou, and then pressing the doun-arrou once, 
This area, belou the TEXTS dots should be left blank. 


Variables ‘Dates’ and ‘priorities’ 
3 rw line ‘Text$’ variable 


(Only the top four lines are used) 


command (CHR(25)) is used to prevent 
long entries from wrapping on to the next 
line. 


LISTDRAW 

As the name suggests, this procedure 
draws the list in full, when required by the 
Program. However it also performs 
another equally important task — select- 
ing the appropriate records from the file. 
The REDRAW flag causes LISTDRAW to 
be run whenever it is not zero. However if 
it is set to two, this denotes not only that 
the dislay needs redrawing, but that a 
different selection of records is required. 
The global variable CURRENTS is used 
to select records relating to the day in 
question, and also any undated records, if 
required. Once selection is complete, the 
entire current list is printed in reverse 
order, so that it scrolls down from the top 
of the screen. This is a little cumbersome 
for a long list, but has the dual advantage 
of being easy to code, and gives aglimpse 
of the bottom of the list, before it scrolls off 
the end. The end of the list is the low 
priority entries, but you don't want to 
forget them completely. 


LISTOPTIONS;:n.exp> 

The last of the LIST something proce- 
dures handles the top level menu options 
not already provided for in LIST, These 
are all application specific, but will need 
replacing with something in all except the 
most simple list applications. In our case, 
the Actions request is passed on to the 
TODOACT sub-menu. The Undo/Done 
option simply toggles a flag to tick off an 
item as done, or re-instate it if it wasn't 
done properly! The remainder of the 
procedure is a sub-menu to change to a 
different date. Six options are offered. 
You can go to the next or previous day 
which has an entry; you can go forward or 
backward one day; you can specify a 
Particular date to go to; or you can go 
directly to today's date. Throughout, 


«Line of red tildes (‘~') 
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ANSWERS temporarily holds the new 
date, and YES marks it as successfully 
found. The REDRAW flag is only reset if 
the new date is different from the old one. 


TODOLIST 

This provides the start point for the To- 
do list, but hands over full control to the 
more general LIST procedure. May of the 
features needed are incorporated into 
LIST already. However we are still some 
way from a workable program. We still 
have no data file, no means of entering or 
modifying data, nothing to clear out old 
entries, and no way of printing out the 
lists. These actions are all very specific to 
this application, and are covered by the 
remaining TODO procedures. We shall 
look first at the data file. 


TODOFILE;<s.exp>,<s.exp> 

This provides a more specific front end 
fo the toolkit FOPEN procedure, being 
passed a message, and logical file name 
as parameters. If FOPEN fails to find the 
named file, TODOFILE gives the user a 
choice: abandon the attempt; try again; or 
create a suitable file of the name given. 
The default file name is TODOLIST, and 
this would normally be acceptable, but if 
you require compartmentalised lists, or if 
it is used by several people, each could 
use a separate file. 

you don't abandon the attempt (which 
forces an error), and you don't re-try 
(which calls TODOFILE recursively), a 
new file will be created. The data structure 
is fairly simple. There are direct text fields 
where you can enter the date (if required), 
a priority value from A to Z, and a 
description of the job to be done, or 
appointment to be kept. The other two are 
hidden fields, one holding the flag to mark 
ajob as done, and one to store a numeric 
value for the date. This last is necessary 
because Archive only orders the first eight 
letters of a text field. 

Since the date format uses ten letters, 
the all important day of the month would 
be ignored when locating a date. To avoid 
this, every new entry with a date must use 
the DAYS() function, to store the numeric 
value as well, and it is this DAYS field 
which will be used as the primary ordering 
for the file. As a secondary ordering, 
PRIORITY$ is used so that low priority 
entries end up lower down the list. 


TODOCLEAR 

Eash list will have two files for its use, 
with an identical field structure. One will 
have a normal ‘_DBF' suffix, and store 
the current and future entries. The other 
will have the same name, but an '‘_HST’ 
suffix to the name, and will store the 
historical records, cleared out from the 
main file. Using non-standard suffixes, 
with the same stem name, is a very handy 
way of showing the link between related 
files. It will be useful at this point to look at 
the sequence of events for starting a To 
Do list session, 

Before running LIST, the TODOCLEAR 
procedure is run. (Exactly the same code 
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is used if you change to a different file 
during the session.) First the required file 
is obtained, and stored in the global 
variable TFILES, using TODOFILE. Next 
the historical counterpart for this is 
obtained in the same way. Starting at the 
end of the current file, each record is 
checked. If it is marked as done, or it itis 
pastits do-by date, it will be transferred to 
the historical file. Once today’s entries are 
reached, the search stops. Future 
records, even if marked as done, will not 
be reached so will not be transferred. 
When complete, the historical file is 
closed, so that LIST will deal with the 
correct set of data. When the HST file 
gets too large you could copy it to a 
different drive if it may be needed again. 
The original can then be deleted, and a 
new one will be created next time you run 
the to-do list. 


TODOACT 

The Actions sub-menu is controlled 
from the TODOACT procedure. The File 
and Print requests are simply passed on 
the TODOCLEAR or TODOPRINT proce- 
dures, while the record handling options, 
Insert, Alter and Delete are handled in- 
house. The first two of these are identical, 
except that Insert has to clear and append 
anew record before it can be ‘altered’ with 
new data. That done, the task of display- 
ing prompts, restoring the active screen, 
using Alter to allow editing, and checking 
for date validity are all common to both. 

In all three cases, complete screen 
redrawing may be necessary, and |s the 
most unsatisfactory aspect of the LIST. 
The alternative, handling the deleting and 
inserting of individual lines in the list, 
would only be feasible on a expanded QL, 
as It would require significant extensions 
to the program. 

For anyone feeling adventurous this 
would make an interesting project. You 
would need to keep track of the records at 
the top and bottom of the window, and 
utilise the partial window scrolling pro- 
vided by screen driver chr(27). You will 
also have to find a way of discovering 
where in the list the new/altered records 
has been moved to, And if the date has 
been changed, the screen will need re- 
drawing anyway. If you still think itis worth 
it, perhaps Open Channel would be 
interested in your efforts. No prizes I'm 
afraid. 


TODOPRINT 

The last procedure covered controls 
the printed output. Three different options 
are offered — to print all of the historial 
records (the only thing you can do with 
them), print all of the current records; or 
print the list of todays/undated entries. 
The same print redirection options are 
used as for the notepad, (printer, screen, 
or file) and the list is then printed out, 
formatted to fit an eighty column page. 

Two programming points of interest are 
used, which will be common needs for 
many data output applications. These are 
sub-headings and text formatting. Sub- 


headings are the more straightforward of 
the two. The file must be ordered, and the 
ordering field (often called a ‘key’ field) 
provides both the control and the content 
of the sub-heading. In our case DATES is 
the control variable, to give a list of all the 
entries for each day under that day's sub- 
heading. Each time round the loop 
DATE$ is compared with the stored 
variable, D$. Whenever they are not 
identical, a new sub-heading is printed, 
and D$ updated to the new date. 

Formatting each line of text is a little 
more complex, involving two nested 
loops, however the end result is so much 
better than simply chopping words in half 
that it is well worth it. The problem is that 
we have generously allotted over 140 
characters to the text line. In many cases 
only 40 or 50 of these may be used, but 
where a long entry is needed, legible 
output is needed. The first WHILE condi- 
tion is used if the line is longer than 60 
characters. If it is not, then the entire loop 
is ignored, and the final print line will print 
out the line. 


Separator 


If the line is longer, the inner loop is 
entered. Starting at position 60, the line is 
scanned backwards until a separator is 
found (defined here as a space, comma, 
full-stop or hyphen). This being the first 
safe place to split the line, itis printed up to 
that point, and removed from the text 
variable. (Because no UPDATE is used, 
the original is unaffected.) 

The same process will again take 
place, until less than 60 characters 
remain, at which point it exits the outer 
loop, and the final line is printed by the 
final print instruction, as for lines that start 
short. The INDENT variable addes a 
slight embellishment to his. Before enter- 
ing the loop it is set to two, so the first line 
to be printed will tab in by the margin plus 
two, regardles of which print instruction is 
used, If the loop is entered, INDENT is set 
to four, so that all subsequent lines, 
including the final one will indent four 
spaces, If the application required it, 
INDENT could be set for less rather than 
more, after the first line, so that the first 
line is indented, rather than the subse- 
quent ones. 

All that remains, once the To Do list is 
fully entered, debugged, and saved is to 
add the START link procedure — and re- 
save it. Itcan then be run automatically by 
the NOTEPAD control program, and to 
find its way back there afterwards. 

| hope that you have found something 
of use in this series. We have covered a 
range of programming techniques, and 
application solutions, which could be 
readily adapted to other situations. We 
have also provided a number of ‘toolkit’ 
procedures, which can be placed directly 
into other programs, to handle many of 
the things common to all situations. As a 
result you should find it worthwhile to run 
up quick, effective programs for all sorts of 
problems which may have seemed out of 
reach until now. 
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BOOK PAGE 


Mike Lloyd examines two books which could improve 
programming skills. 


by 
Babani (publishing) Ltd., 
The Grampians, 
Shepherd's Bush, London 
W6 7NR. 
Price £2.95. 


This slim 


Not very long ago every 
newsagent's magazine 
shelves were under threat from 
atide of computer titles. As that 
wave receded it was the turn of 
the biggest high _ street 
booksellers to suffer from the 
computer invasion, As | know 
to my cost, with a 50,000 word 
manuscript still unpublished, 
this surge died even more 
quickly than the first. 


Huge 


Recently, though, there 
seems to have been a turn in 
the fortunes of the third party 
computer manual dedicated to 
the MS-DOS operating system 
and the major pieces of 
software which run under it. 

Rather in the manner of pulp 
novels sold, as legend has it, 
by the pound, the new wave of 
computer titles are 
monolithically huge. Being 
mostly of American origin, they 
also tend to be impenetrable. 
As an antidote to such 
gigantism | have been reading 
one of the slim budget volumes 
produced by Barnard Babani 
(publishing) Ltd of London. 


Interest 


About the only large attribute 
of Noel Kantaris's Concise 
Advanced User's Guide to MS- 
DOS is the title. However, in 
less than 70 pages the author 
delves into MS-DOS batch 
files, the mysteries of the 
ANSI.SYS commands and the 
complexities of debugging 
assembler routines. These are 
the very topics of interest to all 
QL owners have have invested 
in Digital Precision's 
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marvellous Conqueror MS- 
DOS emulator. 

The book is liberally decked 
with useful reference tables 
and is written in a clear style 
which successfully avoids 
patronising on the one hand 
and pretentious techo-speak 
on the other. The author is the 
Head of Computing at the 
Camborne School of Mines 
and has a number of other 
DOS-related books to his 
credit in the Babani catalogue. 


Batch 


The whole object of the book 
is to introduce some advanced 
DOS programming techniques 
through the medium of writing 
batch files to display and 
manage menus. It is the 
equivalent of — introducing 
readers to SuperBasic by 
demonstrating how to write 
sophisticated BOOT files. This 
choice of approach neatly 
brings together the subjects of 
batch files, the EDLIN line 
editor, many MS-DOS. 
housekeeping routines and 
simple assembler programs. 
Readers can therefore use the 
book as a springboard to 
greater knowledge or as a 
reference for writing relatively 
simple but worthwhile DOS 
utilities. 

Pound for pound, Kantaris's 
book is arguable better value 
than its enormous rivals. Some 
might argue that the book’s title 
is more ambitious than its 
contents, but the contents are 
well worth the cover price and | 
look forward to reading more 
books in the series. 


Software Engineering 
By |. Somerville 
Published by Addison- 
Wesley 
Price £14.95 


Noboby writes programs any 
more; it's all “software 
engineering” now. The 
analogies between writing 
substantial programs and 
more traditional engineering 
skills are quite apposite and 
the term software engineering, 
coined some 20 years ago, has 
gained general acceptance. 


Valuable 


Dr lan Sommerville of the 
University of Strathclyde is a 
respected lecturer in the 
subject of large-scale 
programming projects, and his. 
densely-packed — but never 


computer programming teams 
and the problems of managing 
a software project are added to 
the back of the book. 


Unnecessary 


The University mainframe 
environment intrudes some- 
what —_ unnecessarily into 
some parts of a book which in 
fact appeals to a much wider 
computing fraternity. | would 
have preferred fewer. 
references to the Ada 
programming language and 
cannot agree that languages 
are best categorised according 
to the way in which memory is 
allocated to data storage. 

The most useful parts of the 
book tackled the potentially 
nebulous issues of program 
analysis and design in a down- 
to-earth manner, There is a 
closely-argued three-page 


Densely packed 
but never abstruse 


abstruse — book of over 300 
pages is a valuable reference 
for programmers intent on 
producing their multi- 
thousand-line masterpiece: 


Applicable 


Understandably, the book's 
perspective is from the 
mainframe user's standpoint, 
but the principles it covers are 
applicable to all types of 
programming. Topics include 
the software life cycle, the 
analysis of the user's 
requirements, the specification 
of the software, four different 
design __ strategies, pro- 
gramming methodology and 
style, a review of different 
languages, program testing 
and program documentation. 
Useful insights into the 
psychology of the computer 
user, the group psychology of 


analysis of the limited 
circumstances in — which 
GOTOs are acceptable. The 
discussion of the user interface 
examines the attitudes of 
users and suggests ways of 
simplifying screen designs in 
order to make programs easier 
and more attractive. 


Rewarding 


Software Engineering is not 
always easy to read but it is 
rewarding. If you have started 
on an ambitious programming 
project which has foundered 
through lack of planning 
and organisation, this book 
could show you the way to 
success. 
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TOOLKIT 


1Y Toolkit has been a popular 

part of QL World for four years. 

This month we present 

updates, a review of the 

series, and good news for slow typists; 

DIY Toolkit is now available on disk and 
microdrive cartridge. 

DIY Toolkit builds on SuperBasic and 

QDOS,the programs built into every QL. 

In theory every QL user can customise 

and extend their system with personal 

machine-code nuggets. In practice this is 

a big job unless others contribute ideas 

and share the fruits of your effort. DIY 

Tookit pools ideas and share the fruits of 


Simon Goodwin introduces a host of DIY Demos, 
and a new library of Toolkit updates and extensions. 


your effort. DIY Toolkit pools ideas, 
technique, and information among QL 
users world-wide. 

SuperBasic is a kind of construction 
set, and DIY Toolkit provides components 
which you can use to make new things, or 
improve old ones. 

Toolkit routines make good examples. 
QDOS extensions must be concise, com- 
patible, efficient and re-entrant, so that 
they can be shared between several tasks 


100 TEST : STOF 
110 REMark Type RUN, WHY or 


PRINT + 


%(1-B) 


callline=BPEEK WA i-& 
SELect ON calltype 
=1,2, 

SHOW_LINE 

i=i-24 

SHOW_LINE 

isi-8 


END REPeat 
© END DEFine WHY 


DEFine PROCedure SHOW LINE 
IF callline=0 


ELSE 
PRINT “Called from "$ 3 

END IF 

END DEFine SHOW LINE 


DEFine PROGedure TEST 
GO SUB 540 
0 END DEFine 


DEFine PROCedure TRY 
wHy 
END DEFine 


TRY2 
RETurn 


SAMPLE OUTPUT from WHY: 


Called from S10 WHY 
Galled from 540 TRY2 
Called from 470 GO SUB S40 
Called from 100 TEST : STOF 


eee tel 


TEST to 


Leal ltype.caliiine 
S Of RETURN stack 
pe WHY to find out which calls are in progrewe 


REMark Tidy 


PRINT "Called by a direct SuperBASIC command." 


LIST W1,callline 


ry 


see WHY in action 


non-destructivel y) 


remainder of window 


SuperBasic was designed for the 
Super Spectrum, planned by Sinclair 
in 1982 but never released. In 1983 
Jan Jones’ language was converted 
for the QL, and bolted onto Tony 
Tebby's QDOS operating system. 

Plain vanilla SuperBasic contains 
over a hundred built-in commands and 
functions; these are enough to write 
most straight forward programs, But 
the QL can do more than most micros, 
because it is extensible and supports 
‘big computer’ features like multi- 
tasking and device-independence, 
borrowed from the Unix operating 
system. 

Multi-tasking means that several 
programs can run and communicate 
on one machine. Itcan be aboon when 
you're busy, and means that complex 
programs can be built up from co- 
operating parts, increasing flexibility 
and the potential for re-use of code. 

The QL rom includes the essentials 
for multi-tasking, but few of these 
facilities are available from Sinclair 
SuperBasic, DIY Toolkit is a bridge 
between the code buried in the QL rom 
and the applications we all use. 

Device-independence means prog- 
rams should work consistently with 
any device, real or imaginary. QL 
‘logical devices’ are much more flexi- 
ble than real physical devices, 
because logical devices all appear to 
work in much the same way. You may 
use several physical devices at once, 
as when you access a remote device 
over the QL network, or print via a 
Spooler program that temporarily buf- 
fers output. 

Last year DIY Tookit illustrated all 
the steps involved in writing a device 
driver. Luca Pivato's MEM means 
any task can access any memory 
address on any machine, just as it 
would read or write a file. MEM allows 
unrestricted communication between 
concurrent or sequential tasks. It's 
also a neat example of the techniques 
needed to write any device driver. 
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without causing clashes or hogging 
resources. . 

For instance PURGE (January 1989) is 
handy when tasks go awry, or you need to 
free lots of memory, as it gets rid of all 
tasks except SuperBasic. PURGE uses 
only 20 bytes to tell QDOS the name and 
address of the code.The skill comes in 
choosing the right 20 bytes, and typing 
PURGE at the correct moment. That's 
where the ‘extras’ in DIY Toolkit come in 
useful. 

DIY routines are more comprehen- 
sively documented than commercial Tool- 
kits, as we publish the assembly source 
and details of its workings as well as user 
notes and binary code. Most publishers 
keep source code secret, to ‘protect’ 
themselves from ‘rip-offs’ — but that 
contradicts part of the appeal and value of 
a Toolkit. 

Good Toolkit code Is hard to write, 
especially in a climate of secrecy. It's 
tempting to make assumptions which 
might be valid in a stand-alone program, 
but restrict the potential of Toolkit 
code. DIY Toolkit sets out to avoid these 
limitations, or document them when they 
are unavoidable - rather than hope that no 
one notices snags, leaving hundreds to 
learn the hard way. 

The technical minutiae may pass you 
by today, but the details may come in 
useful if you need to do something out of 
the ordinary. You have the option to pick 
and use published routines, customise 
my assembly code, or use it as inspiration 
for new extensions. 

This library has been finalised on a 
megabyte Thor XVI running DevPac, 
Metacomco's ASM and Psion Xchange 
on this document, alongside several other 
Quill files, with two microfloppy drives, a 
couple of ram disks, and a network link to 
a 640K Samsung QL with Greek roms, 
one 5.25 inch QL drive, microdrives and 
ram disks. | live on the QL and Thor, the 
way some hackers live on modems. 

The assembled binary code is Public 
Domain. In other words, it may be freely 
used by commercial programs as long as 
the DIY part is not sold or used as a 
specific sales gimmick. DIY Toolkit routi- 
nes have been used by major QL pub- 
lishers like CGH Services, Digital Preci- 
sion, Quanta, Sector Software and 
others, although attribution is rare. The 
revised documentation and assembly 
source, however, are protected by Inter- 


national Copyright Law, and may not be 
copied without consent. 

Until now, DIY Toolkit has only been 
available in printed form, though QL 
World. | have mixed Basic examples and 


demonstrations with diagrams, text, 
machine code and assembly source. 

Regular publication means that | can 
publish corrections or extra notes, if 
readers run into difficulty. In practice 
problems have been few as | try to 
provoke programs into failure before they 
are printed, testing their limits, compiling 
them various ways, and suffling roms to 
track down weak points. 

DIY Toolkit files are produced on a 
semi-automatic production line. As a 
professional QL programmer from the 
start, anda micro writer since 1979, |have 
learnt that systematic design and testing 
are essential. | set out to eliminate 
problems before publication, and test 
programs on versions of QDOS from 
“AH” through Argos to Minerva. 

When the code is cooked | use 
specially-written software tools to avoid 
transcription errors, generate the maga- 
zine listings and check that hex and 
assembly files correspond. Tried and 
tested Toolkit commands are at the core 
of this system, 

The limited space in the magazine has 
good and bad side effects. It encourages 
me to pack a lot into a tight space, and 
that's a desirable attribute for a Toolkit. 
But it can also mean distracting cross- 
references to past articles, to avoid 
covering old ground. Often | have to 
condense useful examples, orleave them 
out altogether. 

Perhaps the biggest limitation is the 
need for readers to type each listing if they 
want to take advantage of DIY Toolkit 
code. This can mean that busy people 
miss out, even though they may have 
much to gain from DIY Toolkit, It also 
penalises those who have trouble reading 
and keying listings accurately. I've typed 
and checked all the code, so why should 
others have to repeat this boring task? 


DIY disks 


Now DIY Toolkit is available on 3.5 and 
5.25in disk and microdrive cartridge, by 
arrangement with Richard Alexander of 
CGH Services. The offer is a partnership 
between programmers Simon Goodwin 
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and Phil Spink and publisher Richard 
Alexander, 

Many readers have already typed in 
parts of the Toolkit, so the offeris split into 
three volumes, generally based on two 
magazine articles, plus updates and new 
programs. You don't have to buy more 
than you need. DIY Toolkit must pay for 
itself, but the costs can be low because 
there is no need for expensive advertis- 
ing. QL World benefits because the 
companion disks and tapes make the 
articles more relevant and useful to 
readers. 

| considered supplying the material 
from each month separately, as that 
would make my life relatively simple, but 
in many cases it would be annoying, as 
articles and demonstrations often refer to 
previous code or commentary. The result 
is a library of twelve volumes, each with a 
name and code letter. | have re-typed, 
expanded, updated, merged and edited 
the text for each, to remove duplication 
and reduce the need for cross references. 
Each volume can stand alone. 

This is achance for people to get hold of 
the assembly code for Toolkit routines 
they already use. It’s a chance to obtain 
the upgrades and improvements | have 
made since the routines first appeared, 
and the extra demonstrations that out- 
grew the magazine format or have been 
written since. Finally, it's an opportunity to 
use QL improvements that you did not 
have time to enter from past issues. 


Twelve Volumes 


Volume B - BASIC TOOLS 
This volume is a Toolkit for SuperBasic. 
Six routines let you look through the 
interpreter's own memory areas, and 
change things without risk of the patient 
moving as you POKE it. Thus you can do 
wonderful things, consistently, without 
crashing the machine. The volume inclu- 
des four Basic access routines from 
December 1988, plus tested code for the 
two procedures set as assignments, and 
two new assignments for the 1990s. 

Ten demonstration foutines are 
designed to provoke thought and experi- 
mentation. A SuperBasic token dis- 
assembler reveals each component of 
lines in memory, It's an ideal starting point 
for a host of neat, self-referential hacks. 

ROB GET leaches SuperBasic to ignore 
cel words. For years I've used 
FORGET to resolve Toolkit clashes and 
test variants without resetting the compu- 
ter. What's more, FORGET can reduce 
the size of compiled Basic tasks. 

WHY lists all the GOSUB lines and 
procedure calls that have taken place 
since the last PROC/FN cleared mes- 
sage, The listing appears this month, for 
those addicted to typing. POP is a devious 
routine that simulates a RETurn, renam- 
ing LOCals and parameters - but without 
returning to the caller. Reader Cyril 
Doherty suggested this, for use in inter- 
preted error handlers. It's named after a 
similar feature in SAM Coupe Basic. 
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Volume C - CHANNELS 

This volume combines the Channel func- 
tions from May 1988, and USE - the useful 
default-changing command Sinclair left 
out of SuperBasic at the last moment. 
USE lets you type PRINT, INPUT and 
other channel commands with no need for 
#4 or whatever after each command and 
function. Just #4 to change the 
default channel'to 4, and USE, or USE 
#1, to restore the usual default later. The 
functions come with a dozen small demos 
that show how you can interrogate QDOS 
to find the details of SCR, CON and MEM 
channels, and a discussion of the QDOS 
channel scheme. 


Volume E - ERROR CONTROL 
This volume includes PURGE, which 
quickly removes all tasks but SuperBasic, 
ICK$ - an alternative to SELECT- plus 
HECK%, CHECKF and EDLINES. 
Those three functions let you read and 
validate string and numeric input, avoid- 
ing errors that might otherwise stop your 
program. The volume contains routines 
and text from January and February 1988, 
and January 1989. 


Volume F - FILE TOOLS 

This volume includes 11 files, including 
GetHEAD and SetHEAD commands from 
February 1988, and Customkit from July. 
Customkit combines small files of exten- 
sions into a composite file that loads 
faster and uses less memory. Thus you 
can assemble your own ‘Custom Toolkit’ 
of favourite commands. 

The articles discuss eprom, task and 
data file headers., The eprom compiler 
lets you give your Toolkit collection a rom 
header, so that if you program it into a chip 
your choice of banner appears when you 
reset the QL, and the commands are 
linked into SuperBasic from the start. 


Volume G - Fast GRAPHICS 
The DRAW and PIXEL%, which together 
form a graphics library much faster and 
more predictable than standard Super- 
Basic routines, Four demonstrations are 
included, plus explanatory text. 

The fast graphics routines have been 
extended to suit the new colours in the 
Thor's MODE 122; a suitable 16 colour 
bit-mapped mode is also feasible on the 
Amiga QDOS emulator, but current ver- 
sions only use MODE 4. 


Volume H - HEAP MEMORY / 
HOROLOGY 

This includes the memory-management 
keywords RESERVE, DISCARD and 
LINKUP, from October 1989, plus full 
documentation and SHOW_HEAP, a 
utility by Phil Spink which shows the size 
and location of all areas of heap ram, with 
the name of the task that owns the 
memory. SHOW__HEAP can be invalu- 
able if a task crashes and you need 
access to the data in its buffer. It can also 
explain where all your free memory has 
gone, and how to release it. The updated 
article explains relevant precautions. 
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REMark CHLIST by Phil Spink, tweaks by Simon N Goodwin, 
REMark v4, expanded to find and list active filespecs 
REMark v5, 31/8/87, compatible with MINERVA and THORS 
REMark v6, 2.4.90, Turbo Toolkit commands eliminated 
REMark v7, 5/8/90, Adapted for QL World DIY TOOLKIT 
REMark 


Uses DIY TOOLKIT functions SYSBASE, CHBASE, BPEEN 


DEFine PROCedure CHLIST 


: g 
Ocal) sv jehmax 
OPEN #15," scr 4s 

window off set=CHAN_1D(#15) / 
tindow_offset-windaw_offwet=INT (window of feet /G5536) 46856 
Sv_chbaw = PEEK-L (S¥SBASE*120) 

window offset=sv_chbas+4*window offset //)— t 

window of faRt=CHBASE (W15) “PEEK, Liwindaw! of fact ) 


QKauall| 


288 "address" TO Sét"Name" 
= sv chbas TO (sv chbastsy chmax®4) 
IF PEEK Conte? 285 THEN 
address = PEEK L(chtp? 
PRINT \ch_num% TO 6% PEEK_W(addreaetle? TO 12s TAG 
PRINT JOB NAMES (PEEK W(address$10) PEEK Wiaddresst8))% Jed 4 
PRINT " "$10 263 address TO 36 ¢ o ‘ 
window flag = 0 taraae 
ch_ty © CHANNEL TYPE (address) 
SELect ON ch_ty 


STEP 4 


det slot=PEEK (addresn+29) 
dof _bLOck™PEEK_L (BYSBABE+256edef_wlot #4) 
Linkage*PEEK lide _block+16) q 
enovis" tt 
IF PEEK (addr ens 2@)=1 PRINT" In" PRINT "Trang" 
PRINT "put #4 Les ok Ei he 
2: name_at = PEEP | (PEEK L (addronssa) +8) 
name ink = MPEER ST @n pame=LEN (name ink) 
=! INSTR manu SCHR $ V6) 
INGTR name int (xl 10 Len name) 
inf (xeyet TO 1en_name> 
@ND z = 2 THEN 
Name _at = name _atenedel 
MPEEKS (name _at+2,PEEK_Winame, at)? 
CR” THEN 
- THEN devé="SCR" 
PRINT deves 
addr esweaddr 
PRINT "_"4PE 
PRINT "aM sPE 
IF deve 
PRINT *_" 


atwindow of feet 
28) § "5" }PEEK_W(addreme+S0) 4 
48" 3 PEEK W(adde 


=O f PRINT "#* Not Known" dey tineer 
END SELect 
ch_num% = ch num 
END IF 
END FOR chtp ger =v 
PRINT 
END DEFine CHLIST 


DEFine FuNection IN _LIST(cur_link,Jink) 
REMark Find ‘link’ in linked list 


IF link = cur link THEN 
REMark Found 
RETurn 1 
ELSE 
cur link = PEEK_Licur link) 
IF cur_link = 0 THEN 
REMark End of list = Link 
RETurn 0 
ELSE 
REMark Try next Link 
ReTurn IN LIST(cur Link, link? 
END IF 


not found 


0 END IF 


0 END DEFine IN_LIST " 


0 sv _ddlst = PEEK_L (SYSBASE+72) 


Hhasto ag 
Typ = dz 
pial et ad ult 
| \ 
Uglies fm 


DEFine FuNetion Ci L_TYPE (ch_address) 
link = PEEK_L(ch_addresse4) 
sv_drist = PEEF_L(SYSBASE+48) 


IF IN _LISTisv_drist,link) THEN 
REMark Simple device 

RETurn 2 

ELSE 

RETurn IN_LIST(sv_ddist, link) 

REMark Directory device=1. unknawn=0 

END IF 

END DEFine CHANNEL TYPE 


Se 


—= 


OTF ium = 0 THEN 


RETurn "Super BASIC” 


jb ptr = av chbas+ 
ReMark Is this job 
IF PEEK (jb_ptr) 


ELSE 
RETurn "No Name" 
END IF 


260 END DEFine CHAN ID 


SOO Sa"? 
) FOR p. 


tate & CHR® (PEEK (p) ) 
330 END FOR p 


Horology is the Science of measuring 
time. Five commands and one function 
from May 1989 control four independent 
stop-watches which tick 50 or 60 times a 
second. Any task can read, stop or start 
any of the watches. The instructions 
explain how to re-assemble the code to 


provide more timers, if four is not enough. 


Volume J - JOBS & Multi-tasking 
There are lots of multi-tasking aids 
around, but the DIY Toolkit ones from 
April and October 1989 allow full multi- 
tasking, use very little ram, and are 
exceptionally compatible. 

Peter Postl's Psion Patch is a small 
program that modifies Psion's version 2 
tasks to display a cursor, so they multi- 
task happily with SuperBasic. The patch 
leaves the task size unchanged, but 
means you can load with EXEC instead of 
EXEC W, and use SuperBasic later, or 
load other tasks, 

Peter was inspired by Taskforce, Phil 
Spink's routine that allows switching of 
input between bad-tempered tasks, and 
Stops greedy tasks swallowing all the 
memory. Even a 128K QL can edit a 1200 
word Quill document in memory, along- 
side 7.5K free to SuperBasic at the same 
time. Taskforce makes an ideal BOOT 
routine, 

Extras include updated documentation, 
job control commands, and more of Phil's 
task utilities. JOBNAME TASK displays 
the name of the newly-selected task every 
time you press Control C to change input 
channels. Others let you add names to 
Psion's tasks, or edit job names in files 
compiled with Turbo or Supercharge 
117+. 

. 

Volume M - MultiBasic and beyond 
MultiBasic lets you keep several tok- 
enised SuperBasic programs in one 
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O10 DEFing FuNctLon JOB NAMES (num, taa? 
— 


Sv _chbas = PEEK L(SYSBASE+104) 


jbustart = PEEK L(jb ptr) 

REMark Is the tag correct ? 

IF tag = PEEK Wijb_start+i6) THEN 
REMark Is that an Ident Word (19195 
IF PEEK W(jb_start+110) = 19195 THEN 

RETurn MPEEKS(jb_start+114,PEEK_W(jb_start+112) 


0 DEFine FuNetion CHAN_ID(num%) 
250 RETUrn BPEEK_L(BPEEK _L (48) +numZ#4o) 


REMark Use Turbo TK PEEK® for more speed 
ddr TO adderienZ~1 


= $4aFB) 2 


machine, and swap between them 
instantly under command or program 
control. Versions 3.2 and 3.3 appeared in 
March and August 1990. The new Multi- 
Basic 4 can save and restore the display 
as you swap between SuperBasic tasks. 
The only limit on the number of screens is 
available memory, and swapping is very 
fast. Source and code for versions 3.3 and 
4 are supplied. 

MultiBasic 4 allocates display space 
dynamically in the task area, so it does not 
fragment heap memory. It works wiith 
Thor Basic, Minerva, QRAM, Taskforce, 
Taskmaster and their ilk, Old windowing 
environments do not expect SuperBasic 
to swap, so they don’t exchange MultiBa- 
sic screens automatically. MultiBasic 4 
makes them more consistent than before, 
because screens can swap with all types 
of task. 

Volume N - NETWORKING 

This contains material from three months 
of DIY Toolkit, and more besides; this 
large module is only available on disk. 
NETPAL appeared in July 1990. It lets 
you type commands on other computers, 
linked via the network. You may contro! 
several machines from one keyboard. 
NETPAL includes improved QL, Thor and 
Minerva programs, plus toolkit com- 
mands 

The MEM device, updated from July and 
August 1989, is a complete device driver 
which lets tasks treat memory like a file, 
MEM is a flexible way to store or pass 
information, as it can allocate and share 
buffers between tasks. MEM works on 
any QL, but NETPAL expects at least two 
computers with FSERVE, the remote file 
server. 


Volume P - PIPES and PARAMETERS 
This volume includes nine keywords that 
first appeared in October and December 


1988. They let you use ‘pipes’ in Super- 
Basic programs, and test the parameters 
of SuperBasic routines with the flexibility 
of machine code. Demonstrations include 
SEARCH_PROG, a routine to locate 
specified text in the currently loaded 
program, CAT procedures to show direc- 
tories in neat columns, and a selective file 
purger. 


Volume Q - QUEUES and TABLES 
This volume includes the functions 
QUEUE%, SYSBASE and CHBASE, 
from December 1989, with documenta- 
tion and a dozen SuperBasic examples, 
including Phil Spink's QLIST, and 
CHLIST, printed alongside. 

CHLIST scans the system and shows 
the device and file-names, open-type, 
parameters and other details of all chan- 
nels currently open on the QL or Thor. itis 
compatible with Argos, Sinclair and 
Minerva QDOS. QLIST is similar, but 
shows the input queues that can be 
selected with Control C. QUEUE% enters 
characters into a queue as if they were 
typed at the keyboard, so QLIST helps 
you get them into the right channel. 


Volume R — REPLACE and utility 
functions 

REPLACE was born in the June 1988 QL 
World. \t consistently changes variable, 
loop and device names throughout a 
SuperBasic program. Use it for bulk 
editing, to resolve name clashes, or to 
make programs more readable. 
REPLACE is very fast and context- 
sensitive; it does not change things it 
should leave alone, like text in quotes and 
strings. Volume R also includes the utility 
functions NEWCHAN%, LOCKUP%, 
LOWER$ and UPPER$, which | intro- 
duced last month. 


Old Masters 

These twelve volumes expand on the 
material published from January 1988 to 
date. They do not include the first DIY 
Toolkit articles, written by Marcus Jeffrey 
in 1987, We may collate early DIYs if the 
current volumes are popular and readers, 
ask after earlier ones like TUNE, SPEED, 
LINESD, POKE_$  PEEK_$, 
G_SAVE and G_LOAD, if Marcus 
agrees and can find the original files. This 
will take a while in any case; the routines 
need testing on later roms and some bugs 
need correction. 


Overview 
The revised DOC files supplied with the 
bundles total over 50,000 words. They 
have been updated to match code 
improvements, document the extra 
demos and utilities, and to reduce the 
need for cross-referencing between files. 

The revisions are expanded from my 
original text, whereas all the words printed 
in the magazine are re-typed by outside 
type-setters, who were rather erratic in~ 
the early days. 

The revisions include jokes edited out 
by our erstwhile sub. Commas, under- 
scores, zeroes, and spaces take their 


hewn 


intended places, and ‘umlaut’ no longer 
appears as ‘amulet 


You can print or edit these _DOCs with 
Quill or Xchange. A printed introduction 
comes with the disk or cartridge, along 
with photocopies of freehand diagrams 
that do not suit Quill; again, these come 
straight from my original copy. 

The CODE and_ASM files include 
50-odd resident procedures and func- 
tions, assembled with HiSoft's DevPac. | 
have checked and tweaked all the _ASM 
files to suit Metacomco's Assembler, 
which is fussy about ‘generic’ instructions 
which DevPac and Sinclair-endorsed 
assemblers swallow without complaint. 
Each CODE file has a matching Super- 
Basic _BOOT file to load it. Line numbers. 
differ for each, so BOOT files can be 
merged. 

SuperBasic examples have a three- 
partname, starting with the volume name, 
followed by a description of the example, 
and the extension _BAS. Be sure to load 
the appropriate Toolkit keywords before 
loading these programs, or you may see a 
‘BAD NAME’ or ‘ERROR IN EXPRESS- 
ION’ report, If so LRUN the appropriate 
—BOOT file to load the extensions, then 
re-LOAD the SuperBasic. 

You can freely use the binary CODE 
files, or re-assembled variations of them, 
in complete programs which may be sold 
or given away, but you may not charge 
anyone for the DIY Toolkit machine code. 
—BAS, —ASM and —DOC files are 
copyright. Each purchaser is licensed to 


edit or modify them, but may not supply 
them, or the information therein, to others 
without written permission from the 
authors. 


Ordering 


Each volume costs £3. Future toolkits 
will be bundled in a similar way, available 
on the same basis as the corresponding 
issue of QL World appears. 

There is a processing charge of £4 per 
order. Thereafter, each bundle costs £3, 
so the total price of bundles goes down as 
you order more. The minimum charge is 
thus £7, for one volume, but you can buy 
two volumes for £10, three for £13 (£4 + 
£3 x 3), and so on. This formula reflects 
our wish to make DIY Toolkit routines 
available to as many readers as possible, 
and the full cost of processing small 
orders. 

Please make payment to DIY TOOL- 
KIT, in British Pounds, Sterling postal 
orders, drafts or Eurocheques; all che- 
ques drawn on UK banks are acceptable; 
CGH cannot accept Credit Cards, foreign 
funds, ECUs or !OUs. 

We are taking a calculated risk in 
choosing these low prices. We offset this 
by splitting the Toolkit into sensible lumps, 
so that you don't have to pay for more than 
you want, and can come back for more 
later, if you like your first helping. 

We do not use second-hand cartridges 
or ‘unbranded' disks. They may be fine for 
use at home, but here they would repre- 


the inconvenience and delay of sending 
replacements. DIY Toolkit uses branded 
and guaranteed Sony disks, and new 
microdrive cartridges from this year's 
production at Ablex. We will promptly 
replace media damaged in transit or 
return of the faulty item. 

CGH duplicates media to order, to 
ensure that everyone gets the latest 
version. Disk duplication get priority, as 
disks can be copied and packed more 
easily than cartridges, but CGH Services 
are established and well-organised; | am 
confident that they will process all orders 
efficiently. Please make it quite clear 
which volumes you want. 

Technical enquiries and suggestions 
will be forwarded to the authors. | have 
done my best to anticipate questions in 
the revised documents. Please be patient 
if you weant personal advice; I'm keen, 
but there are lots of you. 

Delivery will be as fast as is practical; 
CGH uses First Class post in the UK, and 
Air Mail to Europe. Please indicate your 
preferences if you live further away, or 
send an extra £2 for Swiftair service. 
“Swiftair provides accelerated treatment 
in the UK and express delivery abroad 
where available", according to the Post 
Office 


sent false economy. We want to ras | 


Write to DIY Toolkit (Orders), Cwm Gwen 
Hall, Pencader, Dyfed, Cymru SA39 9HA, 
or call Richard Alexander at 0559 384 
574. 


text87 version 3.00 


offers today's state-of-the-art user-friendly environment for document 
production, With integrated spelling-checker and extensive support for 
highest quality printing possible on daisywheel and 9-pin printers. 


fountext88..founted89, « 


graphic printer-driver and editor for text87 provide graphic founts 
without the limitations in text editing and document size imposed by QL 
desktop-publishing programs, More than 35 quality founts of up to 72 
pixels in height are supplied and new founts can be designed or captured 
from saved screen images. 


248 8 9 the state-of-art text-mode printer drivers for selected 


Epson LQ, NEC P, Star LC and Panasonic KXP 24-pin printers offer 
advanced features such as multiple typefaces, proportional spacing, 
micro-justification, double height, shadow and outline modes (depending 
on the printer model). 


New Releases 
text87DUAg Cl, ruuivetearesore? 


version 3,00, the only limitations Ts that it cannot be used with 24-pin and 
laser printer drivers. Upgrade to the full version will be availabe at the 
price difference. 


typeset90-desk Jet seu :noe pine: 


drivers for Hewlett-Packard Deskjet and Deskjet plus support printer's 
intemal founts plus the full range of Roman and Helvetica plug-in 
cartridges. 


typeset90-laserjet wns iin 


driver for Hewlett-Packard Laserjet series printers supports printer's 
intemal founts plus a wide range of fount cartridges (incl. Roman, 
Helvetica, Universe) in sizes between 6 points and 72 points. 


typeset90-GQ5000 sins 


printer drivers for the Epson GQ-5000 supponss printer's internal scalable 
and bit-mapped founts in sizes between 6 points and 72 points. 


text87budget: £45 @ text87: £60 @ fountext88 + founted89: £40 @ 2488: £15 
typeset90-deskjet: £20 @ typeset90-laserjet: £40 @ typeset90-GQ5000: £40 
special offer extended to 15 October: £10 discount on orders of £100 or more 


Software is available in English, French, German and Italian, Prices are inclusive of airmail. Payable by cheque, Postal Order or Eurocheque. 
Please specify language and disk system (all 31/2" and 51/4” formats can be supplied). text87 requires at least 256K memory expansion. 


Software87, 33 Savernake Road, London NW3 2JU 


Sinclaix/QL World October 1990 


Archive may not 
be able to change 
history, but it can 
rearrange dates 
to suit itself, says 
Mike Lloyd 


any QL owners are apt to 

forget that two program- 

ming languages came with 

their computer: SuperBasic 
and Archive, the programming language 
for the database bundled in the Psion 
package, Psion are no longer developing 
Archive and more recent database soft- 
ware on the MS-DOS market tends to 
outperform it, but Archive is a powerful 
and attractive language despite its limita- 
tions. Using it seriously is often a labour of 
love, but the results are usually worth- 
while and occasionally astonishingly 
good. 

One of Archive’s more serious omis- 
sions is the lack of a comprehensive data 
management suite. This is all the more 
remarkable bearing in mmind that most 
databases contain date fields of some sort 
or other and that data is very often 
manipulated or searched for according to 
a date value. Accompanying this article 
are a set of a useful Archive procedures 
which fill the gap left by the original 
authors of the language 

Archive has only numeric and string 
field types for its database records 
whereas most of its rivals have specific 
date fields with special attributes. Dates 
must therefore be held in Archive as 
either a number or a string and be 
manipulated either by specially written 
procedures or by the three date-related 
functions included in the language. 

The first date function in Archive is 
DATE which converts today’s date into 
one of three date display strings according, 
to a numeric parameter, as follows: 


Value Date String 
0 “YYYY/MM/DD” 
\ “DD/MM/YYYY" 
2 “MM/DD/YYYY” 


The first string puts the most significant 
value first, presumably in order to simplify 
date comparisons. The second value is a 
| staditional British format and the final 


ARCHIVE DATE 


LISTING 1 
proc VALtoTEXT; tempday 
local feblen 
let DAY=tempday-145001 
if DAY<O: return : endif :rem 0 = 31 Dec 79 
let YEARsint (DAY/365.25) 
let DAY=DAY-int (YEAR*365.25) :rem corrects Leap Year 
if (1980+YEAR) /4=int ((1980+YEAR) /4) 
let feblen=29: else ; let: feblen=28 
endif 
if DAY<=31; let MONTH=1 
else : if DAY<=31+feblen; let MONTH=2: let DAY=DAY-31 
else : let DAY=DAY-31-feblen 
if DAY<=31: let MONTH=3 
else : if DAY<=61: let MONTH=4: let DAY=DAY-31 
else : if DAY<=92: let MONTH=5: let DAY=DAY-61 
else : if DAY<=122: let MONTH=6: let DAY=DAY-92 
else : if DAY<=153: let MONTH=7; let DAY=DAY-122 
else : if DAY<=184: let MONTH=8: let DAY=DAY-153 
else ; if DAY<=214; let MONTH=9: let DAY=DAY-184 
else ; if DAY<=245: let MONTH=10; let DAY=DAY-214 
else ; if DAY<=275: let MONTH=11: let DAY=DAY-245 
else ; let MONTH=12: let DAY=DAY-275 
endif 
endif 
endif 
endif 
endif 
endif 
endif 
endif 
endif 
endif 
endif 


option is the muddled format favoured by 
Americans and Japanese digital wrist- 
watches, 

For my money, none of them is alto- 
gether suitable for displaying dates, They 
are all numeric, leading zerios must be 
used for values less than ten, and the use 
of the slash creat olid-looking body of 
characters which is difficult to read 
quickly and accurately. My preference is 
for the month to be represented by three 
letters and the year by two digits with all 
the elements separated by spaces, such as: 


12 Mar 90 


By passing a date in Archive's “Type 0” 
date format to the function DAYS it is 
possible to obtain the number of days 
which have elapsed since the start of 
Archive's calendar on 1 Jan 1583, the first 
complete year in the Gregorian calendar. 
Known as a relative date, this method of 
storing date values is commonplace across 
all types of databases. it allows ready 
comparision between dates and it is 
possible to carry out date arithmetic, such 
as finding the date sixty days after today’s 
date. Archive reduces the value of relative 


S 


let DATE$=num (DAY, 2) +" "+month (MONTH) (1 to 3)+" "+str (BO+YEAR, 2,0) 


dates, however, by not including a func- 
tion to convert them back to date strings. 

The final date-related function is 
MONTH, which converts a number into 
the name of the appropriate month of the 
year with 1 producing “January”, 2 pro- 
ducing “February” and so on. The mod- 
ulus of numbers greater than 12 are used 
so that 13 again produces “January”, 

In the Archive applications which I 
produce commercially I have standardised 
all date displays to the “18 Jan 90” type of 
format. Because dates stored in the 
database are displayed far more often 
than they are used for comparisons all of 
my date fields hold the date in the form in 
which they are printed on the screen. 
However, in order to perform date arith- 
metic, for instance to search for records 
created after a given date, a procedure is 
required to convert date strings to their 
relative date equivalents, Occasionally it 
is necessary to convert in the opposite 
direction so that relative dates become 
date strings. The first two listings show 
procedures which carry out these conver- 
sions. 

Listing 1 is responsible for turning 
relative dates into text strings, hence the 
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name VALtoTEXT. The single para- 
meter passed ot it is treated as a relative 
date in the Archive calendar. To avoid 
complexities caused by the rule that only 
century dates divisible by 400 are leap 
years (so that 1900 was nota leap year, but 
the year 2000 will be) a new relative start 
date was chosen. By happy coincidence, 
31 Dec 79 is Day 145000 in Archive's 
calendar and so it was used as the earliest 
valid date. This has proved to be entirely 
suitable for databases dealing with mod- 
ern events, but QL owners using Archive 
for historical purposes will need to adapt 
these procedures slightly to work with 
earlier dates. 


Leap years 


Leap years are a problem because of the 
extra day in February, and so a special 
local variable is declared to represent the 
length of February, Global variables are 
used to represent the day, month and year 
(in two digits). All global variables are 
identified throughout the listings by being 
shown in capitals. After setting DAY to its 
new relative value and testing to see if it is 
still positive the year is calculated by 
dividing DAY by 365.25, the correct 
number of days per solar year. DAY is 
then reduced by the number of days in the 
whole years and the length of February is 
calculated according to whether the cur- 
rent year is a leap year or not. 

It is now necessary to calculate which 
month the relative date is in. Unfortun- 
ately there is no pattern to the number of 
days in each month and so twelve nested 
IF statements must be worked through in 
order to arrive at the correct month, The 


LISTING 2 


proc TEXTtoVAL ; tempdates 
local d§,m$, y$ 
let d$=tempdates(1 to 2) 
if dS(1)=" "2 
let mS=tempdates (4 to 6) 


let DATEVAL=days (tempdate$) 
endproc 


principle is simple: after taking away the 
whole number of years, if the remaining 
days number less than 31 the date must be 
within January, if the remainder is more 
than 31 but less than 59 then the date must 
be in February, and so on. Because of 
February's vagaries dates from | March 
onwards are worked out using | March as 
the base date. 

Whatever month is calculated a remain- 
der will be left, representing the day of the 
month. At the end of the nested IF 
statements, therefore, the variables 
YEAR, MONTH and DAY are all set to 
values which can be used to create a date 
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let d$="0"+d$ (2): endif 


let m$=str ((instr (" JanFebMarAprMay Jun Jul AugSepOctNovDec" ,m$) +2) /3,2,0) 
if len(m$)=1; let m$="0"+m$: endif 


string. Archive might not be blessed with 
many date-related functions but it is 
positively overflowing with functions for 
converting numbers into text and vice 
versa. The NUM function is used to 
convert the DAY variable to a string so 
that there is a leading space for dates 
earlier than the tenth of each month. This. 
makes it easier to align dates in columns. 

The MONTH function returns the 
entire name of the month and so just the 
first. three characters are selected. 
Incidentally, unlike SuperBasic’s fussy 
treatment of reserved keywords, Archive 
allows words to be used as variables even 
though they are keywords, The “month 
(MONTH)” clause causes no problems at 
all. 

The year value is converted with the 
STR function because alignment is not an 
issue. The date elements are linked 
together by spaces and held in the global 
variabel DATE$ which retains its value 
until the next call to the VALtoTEXT 
function. 

The reverse process is much easier 
because the Archive DAYS function can 
be used to convert date strings into 
relative dates, provided that the string is in 
the right format iting 2 shows the 
TEXTtoVAL procedure which changes 
dates like “9 Oct 92” into the required 
Type 0 format (‘1992/10/09") before pro- 
ducing a numeric relative date value. 

Three local variables are declared to 
hold the day, month and year values. D$is 
found by slicing the first two characters 
from the date string passed to the proce- 
dure. If the leading character is blank it 
replaced by a zero. The month, of course, 
is a three-letter abbreviation. The 


numeric equivalent is found using the 
INSTR function which works in a similar 
way to the SuperBasic equivalent, albeit 
with a more conventional syntax. The 
number is converted to a string in the same 
multi-function command, Again, if a 
leading zero is required it is added to the 
front of the string. 


All of the date elements can now be 
assembled into the correct order, not 
forgetting to give the year a four-figure 
format. Because Archive differs from 


SuperBasic by passing parameters by 
value rather than by reference it is possi- 
ble to treat Archive parameters as local 
variables. The tempdate$ variable is 
therefore put to good use as the final 
destination of the date elements before 
the days function produces a relative date 
value. As with the DATES variable in the 
previous procedure the result is put into a 
global variable, this time called DATE- 
VAL, which can be accessed outside the 
TEXTtoVAL procedure. 


Applications 


Having achieved the essential conver- 
sions from text dates to relative dates and 
back again it is possible to use the 
procedures within others in order to make 
full use of dates in database applications, 
Three examples are used to illustrate this 
article. The first finds the date of the 
Friday immediately following a given 
date, of use in applications where “week 
ending” dates are important. The second 
calculates the period between two dates in 
days, weeks, months and years. The third 
procedure takes a date and a period of 
its argument and produces the date 
at which the period ends. This allows a 
database to display the date of an invoice 
and the date on which the thirty days’ 
grace will expire, for example, 

As explained earlier, | habitually hold 
itrings to accelerate sereen ref-, 
so my procedures tend to take 
date parameters in the “18 Jun 91” style. 


LISTING 3 


proc WeekEnding; tempdates 

local tempdate 
TEXTtOVAL ; tempdate$ 
let FRIDATE=int (DATEVAL /7) *7+6 
VAL toTEXT; FRIDATE: 
endproc 


LISTING 4 


proc DateDi ff ;date1$,date2$ 
local date1,date2 
TEXTtoVAL ;date1$: let datel=DATEVAL 
TEXTtoVAL ;date2$: let date2=DATEVAL 
let DAYGAP=date2-date1 
let WEEKGAP=int (DAYGAP/7+0.5) 
let MONTHGAP=int (DAYGAP/30,44+0.5) 
let YEARGAP=int (DAYGAP/365.25+0.5) 
endproc 


LISTING 5 


proc EndDate; tempdate$, period 
TEXTtoVAL; tempdate$ 
Jet EDATE=DATEVAL +per iod 
VAL toTEXT ; EDATE 
let EDATES=DATES 
endproc 
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let FRIDATE$=DATE$ 


Some changes to the following listings will 
be needed if you choose to adopt another 
standard for displaying or storing dates. 
The WeekEnding procedure takes a 
single date as a parameter, which it 
converts to a relative date using the 
TEXTtoVAL procedure described 
above. The relative date is divided by 
seven, the remainder thrown away, and 
then multiplied by seven to give the 
relative date of the Saturday preceding the 
day in question. By simply adding six to 
this value the relative date of the Friday 
following the given date is found. This is 
converted into a string using the VALto- 
TEXT procedure. Note that at end end of 
the process there are two useful values 
available: FRIDATE, the relative date, 
and FRIDATES, its text equivalent. 


Relativity 


DateDiff takes as parameters two 
dates, the second one assumed to be later 
than the first. Both are converted to 
relative dates with the resulting values 
held in local variables. The difference in 
days is quickly found by subtraction and 
stored in the DAYGAP variable. The 
difference interms of weeks, months and 
years is calculated by dividing this figure 
by a constant, but it can be seen that some 
approximation is accepted in order to 
keep the procedure simple, The addition 
of +S to every value before its integer is 


found ensures that values are rounded to 
the nearest whole number. 

The final procedure follows the pattern 
set by its predecessors. It takes a date in 
text format and a number of da’ its 
parameters. The relative date equivalent 
of the date string is calculated and the 
period value added to it to form EDATE, 
the relative date of the end of the period. 
This variable is then passed to the VALto- 


TEXT procedure to obtain its text equiva- 
lent which is stored in the variable 
EDATES. These two values can then be 
used outside the procedure until it is next 
called. 

To tie all of the previous listing together 
a demonstration procedure has been 
included (and called “start”) which can 
also be used as a testbed for the date 
utilities, 


LISTING 6 


proc start 
cls ; let col=50 


if days (date (0))<=3 
endif 


let YR1990$="01 Jan 90" 


print"... 
VALtoTEXT;YR90: print DATES 


weekending;TODAY$: print FRIDATES 


DateDi ff ;FirstFri$,FRIDATES 
print tab 1 
";MONTHGAP ;"" months. 


Enddate; TODAYS, 10: print EDATES 
endproc 


print "The QL Clock reads:-"; tab col ;date(1) 
print "Adjust to today's date and try again": stop 


print "Within your application the date is:- 
VALtoTEXT ; days (date(0)): let TODAY$=DATE$: print TODAYS 


print YR1990$;" can be converted to day number:- "; tab col; 
TEXTtOVAL ;YR1990$: let YROO=DATEVAL: print DATEVAL 

and converted back again to:—"; 
print "The first Friday in the year was:-"; tab col; 
WeekEnding;YR1990$: print FRIDATE$: let FirstFri$=FRIDATES 
print "Next Friday's date isi-"; tab col; 
print "The difference between the 2 dates is:-" 
:DAYGAP;"" days, or ";WEEKGAP;" weeks, or 


print "In ten days time it will be:- 


shipments abroad. 
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Anti-bounce device for standard keyboard 


All the above items come with full instructions. 


All prices inclusive of V.A.T. 
P&P. free of charge in U.K. & N, Ireland.'Phone or write for details of cost for 


SPECIAL OFFERS 
OO WEYBOARDS ! 


Standard QL replacement keyboard, with black enclosure - 


KBL 128 all-purpose computer enclosure......................-....--...... £28.00 
64 way «Flip back» connector for KBL 128.................................. £& 8.00 


Send your order, with cheque or postal order, to: 


KEYBOARD PRODUCTS LTD. 
UNIT E2,WELLAND IND. ESTATE 
VALLEY WAY 

MARKET HARBOROUGH 
LEICS. 
Tel. 0858 410048 Fax. 0858 66786 


LE16 7PS 


tab col; 


tab col; 
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Edwin Osborn tells 

how he started with 
Quill and developed 
his QL dramatically. 


y first real first-hand 
experience of the elec- 
tronic processing age 
was the purchase of a 

Brother EP44 typewriter/printer 
about five years ago — which quickly 
led to my coveting a micro as soon as 
| could afford one. As a step toward 
making better use of the EP44, | 
succeeded in tape-recording and 
replaying the EP44's memory with 
the help of a_ surprisingly simple 
home-made interface. Sadly, practi- 
cal application was limited since one 
could only print the tape-recorded 
memory — not feed it back into the 
typewriter's memory for further edit- 
ing. 

At about the same time, the office 
where | was working purchased a 
similar-system Canon and turned out 
to have an otherwise unused BBC 
micro. So | borrowed the latter as 
often as possible, both to drive my 
EP44 and in an attempt to persuade 
my office to computerise, if only to do 
a little word-processing. My prog- 


My system: the oscilloscope is displaying output for the lighting dimmer 
racks, the small box behind and to the left of the QL is the dimmer-board 
interface, the fireman's cap is used to protect against morning sun through 
the windows! 


rams for the BBC (written ‘from 
scratch’ in Basic and Wordwise Plus 
Basic solely with the help of the 
handbooks) were unfortunately too 
clumsy to persuade anybody that 
computers could be seriously useful, 
but the main problem was that oper- 
ators almost invariably hit the Break 
key at some crucial point or failed to 


Update s— 


13502, 


iT ago SPF=hol 


4 


The “Dimmer Board” in-show operating screen: the two white patches near 
the top show highlighted fading times in black on white. 


follow prompts, and the Wordwise- 
Plus wordprocessor is certainly not 
the most user-friendly. 

However, the experience was 
valuable, When | first started prog- 
ramming | spend a nightmare three 


weeks not realising the computer 
was faulty. | now always remind 
myself that a problem might be 


electronic and not be in my program- 
ming. | learnt a lot about using printer 
code books and a little about the use 
of procedures. | formed some work- 
ing opinions about the use of compu- 
ters, including (i) that a near-static 
screen display is best for serious use 
and (ii) that computers ARE a nui- 
sance if not carefully programmed to 
do just what is needed — preferably 
for something not easy to do in any 
other way. 

| purchased my first 128K basic QL 
three summers ago, to use initially 
with the EP44 as printer and a rented 
SONY 12 in colour TV as monitor, a 
surprisingly good screen. | found | 
could use MODE 4 and CSIZE 0,0 


quite happily. 
By now | had seen and tried 
various wordprocessors and was 


consequently very pleased with Quill 
It seems an almost ideal wordproces- 
sor for the many people who want an 
instantly usable wordprocessor and 
who are scared and bewildered by 
superb but complex alternatives. | 
now “teach” basic wordprocessing 
part-time to 17-25 year old students 
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and they certainly do not find other 
programs easy to use — nor do staff 
at the same college which has just 
computerised its offices. 

Needless to say, when it came to 
tax returns (1 am self employed and 
do my own accounts), Abacus did the 
job splendidly, and also for a friend 
for whom it saved £15,000 in possi- 
ble back-tax when | was able to 
produce acceptable accounts, 
mainly thanks to the QL. 

At this stage | was also about to 
Start up a small business as a tutorial 
agency, requiring filing and mail- 
merge type facilities, so | launched 
into programming Archive for this, 
mail-merging clumsily with Quill. 
Neither system was very satisfac- 
tory, and | constantly tried program- 
ming my own facilities — and con- 
stantly met what became the 


just when the program began to 
seem useful! 
Then | received a commission to 


type up large numbers of A/level and 
GCSE test papers for which | was 
loaned the 14 in CUB monitor | still 
use, and used Quill highly success- 
fully for this in combination with a 
loaned Brother Daisywheel printer. 
The only snags | met were that Quill 
sometimes locked up when scrolling 
upwards past a page break in a 
document that had been severely 
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dreaded “out-of-memory" message 
edited — and | was occasionally 
confused by the Quill bug that 
repeats “ghost” words when re- 
adjusting line-filling. (1 have never 
worked out the exact sequence that 
causes this — | merely cure it by 
deleting one letter of the repeated 


word or phrase, when Quill re-adjusts 
and prints the correct text, less the 
letter just deleted.) 

The CUB monitor revolutionised 
my feelings about computing, with its 
superbly “still” display (| have not 
seen another monitor on any 
machine quite so restful, and | have 
seen many almost painful to use) but 
created an alarming problem: plug- 
ging the (switched-on) monitor in with 
the computer on created, first, 


“strange effects", and then blew the 
this my 


video-driver chip! | made 


The Lighting Design full-screen display with plan in place: a reduced-window 
display is available allowing room for the menu and clock. 


excuse to buy a second QL with 640K 
memory expansion as well as repair- 
ing the original. 

| received advice that diodes in 
series with the video lines might cure 
the problem (caused by static) but 
this proved unusable. The chip sur- 
vived but the RGB elements of the 
picture became displaced from each 
other, an entertaining but unsatisfac- 
tory effect. To this day | am merely 
careful to plug in (and so switch on) 
the computer last — a pity in that | 


The Lighting Design “items” screen 
(one of two): editable symbols can be 
placed on the main plan and then 

rotated/enlarged/shrunk as required. 


used to be able to leave on just the 


computer (continuously) to maintain 
the clock. 
The typing commission provided 


funds to purchase a Brother M-1209 
dot matrix printer, and | moved on to 
typing up French, German, Chemis- 
try, Maths and Physics papers with 
elaborate use of the Quill translate 
codes allowing me to print almost any 
symbol. | overcame the Quill trans- 
late limitations by a mixture of having 
several Quill microdrives with diffe- 
rent printer data set-ups and typing 
directly symbols that were incorrect on 
screen but correct when printed. Not 
ideal, but not particularly difficult with 
a little practice and a “translate 
sheet" stuck in full view. Incidentally, 
| now use this latter method con- 
stantly to produce imperfect but use- 
ful tabulation boxes — underline for 
the horizontals and CTRL+SHIFT+ 
S for the verticals which by chance 
produces a reasonably suitable sym- 
bol on screen: an upside-down “!" 

With the extended memory, Quill 
never locked up again, but the out of 
memory message alarmingly _ still 
bugged my own filing program, to my 
dismay, until | found a solution. | note 
this here because it may be of use to 
others still learning like myself. My 
explanation may not be entirely cor- 
rect, | hasten to add, but | believe it is 
essentially correct. 

The handbook encourages one to 
make use of the fact that one can pull 
out a single item from a string array 
simply by giving parameters. In my 
case, | had a file entry store DIM 
rec$(200,12,40). To edit file entries, | 
printed the “active character" with 
paper 2 (giving a red cursor block), 


using a line like AT y,x:PRINT 
rec§$(r,,c). However, it seems that 
this instruction causes the QL to 


make a copy of the whole array, from 
which it then prints the one item — 
thereby rapidly using up blocks of 
heap which become inaccessible for 
use later. The solution was to use a 
“carrier” string, preferably dimen- 
sioned, so that with arrays DIM 
rec$(200,12,40).c$(1), the _ printing 
instruction line becomes: c$= 
rec$(r|,c):AT y,x,:PRINT c$. Sud- 
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denly the QL's memory became (rela- 
tively) cavernous. 

Around the same time | discovered that 
although it was possible to make loops by 
having a procedure call itself (recursive 
loop), this both appeared to use more 
memory (| understand the computer 
makes a copy of the procedure variables 
each time round) and — more obviously 
— resulted in a bumpy display. For 
example, when moving a “cursor” as 
created above along a line, this would 
move smoothly for about five places, the 
“glitch” a moment before moving on. The 
solution, was, of course, to use normal 
REPEAT loops. 

At this stage, with a 20-page filing 
program, compilation became essential. | 
found and find the budget Q-Liberator 
excellent and essential. | also added DP 
Lightning — another essential, The filing 
program started to look and feel like a 
piece of commerical software, and com- 
pletely satisfied my criteria for usefulness. 
In combination with a mildly bugged self- 
written word-processor/mail-merge prog- 
tam, | could send out fifty and more letters 
in half a morning and keep legally 
required reference files of my dealings 
with clients. Incidentally, my clients’ refer- 
ence numbers are generated entirely by 
the computer and lead directly to their 
reference files “sideways” — mdv2 held 
the main files, which could be cut about 
and modified at will, while mdv1 held the 
variable-length reference files simply 
named and called-up from any main file 
by the reference numbers. 

With compiliation, speed enhancement 
and more programming experience | 
began to be more than a little addicted — 
and increasingly pleased with what the 
QL could achieve. For some time | had felt 
like an underdog compared with those 
able to afford more expensive and more 
socially-acceptable systems, but now | 
began to realise that— as many QL World 


cl 


articles had included to my (then) surprise 
— it was true that the QL is in many ways 
more usable and useful than many more 
expensive machines. | wrote a version of 
pocket Halma (or Chinese Checkers) with 
relative ease to celebrate having entered 
successfully the Critical Mass game prog- 
ram printed in QL World. 


Miracle System 


Anew project now suggested itself —to 
write a program to make the QL look like a 
manual theatre-lighting dimmer board 
(see the screen-dump) and operate like a 
computerised one, which would operate 
the lights via a suitable interface to 
standard dimmer (Strand) units which use 
a multiplexed input. Further, to write a 
linked lighting-design plan-drawing prog- 
ram — and both simple enough for 
students to use without hours of training, 

Funds arrived happily in the middle of 
this project allowing me to upgrade to an 
896K Trump card with Miracle systems 
twin disk-drive — and (of course) my QL's 
capability took another leap upwards. 
Screens can be snapped into place by 
LBYTEing from ram memories: loading 
and saving is apparently infallible 
(although | did not have much trouble with 
microdrives and regard them as under- 
tated — they only failed me as often as | 
have known over-used BBC/Cumana dri- 
ven 5.25in. disks to fail, le, rarely but 
always when it really matters! Psion 
printer drivers are “transparent”. 

Building the interface was an agreeable 
challenge — | decided to use the QL 
SER1 output at 9600 Baud on the 
grounds tht any errors in my electronics 
would then not blow any chips in the QL. 
The major problem was to get the QL to 
feed out data fast enough to keep lighting 
fades smooth and in general to produce 
real-time responses where a tenth of a 


House=12 
(+ Xmas tree!) 


(Patch with 
Plano/F.Sp) 


Steve 


Aree 


(Seating) 


second's unpredictable delay can be too 
much. Carefully planned loops and use of 
the KEYROW function produced the 
required effects (simultaneous keying of 
more than one option is possible with this) 
and the “dimmer board" has now been 
used successfully on three productions. 
On two of the productions, the progam 
was actually proved not just useful but 
essential — | was able to pre-plan “blind” 
complete sequences of cues which, in the 
event, | only had time to check briefly 
before showtime. Other advantages of 
the program over standard lighting sys- 
tems are that one can have cue lines on 
screen and text labels identifying lantern 
function. 

The linked lighting-design planning 
section of the program is not yet com- 
plete, needing its own little wordproces- 
sing section for notes and also help 
screens, but has already proved very 
usable. A major criterion here was sim- 
plicity of operation — which | felt | must 
have achieved when my 8-year old neice 
confidently drew a Humpty Dumpty on a 
wall on a stage with looped curtains! 
Another was to be specific to lighting 
design — the program allows one to 
check lantern coverage both via “light 
pools” on the “floor” of the plan and via 
vertical cross-sections, complete with 
stick-man. 

| found | needed to write my own screen 
dump to print genuinely scale diagrams 
printed horizontally or vertically (still 2% 
out — and taking a while to print). These 
dumps run as multi-tasking tasks, and | 
have included the listing for the horizontal 
dump since others may find it useful, if 
slow. Just recently, however, | have found 
further use for the plan-drawing program, 
producing maps for my archaeologist 
financée. For this purpose, the dot-matrix 
print-out quality proved unacceptable, 
but the program stores graphics data in a. 
format ideal for driving a pen-plotter such 
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as the Epson HI-80. Using this, good- 
quality maps and plans can be produced 
in acceptably short times — about two 
minutes compared to twenty for an A4- 
sized (vertical format) dump (the horizon- 
tal dump takes about 12 minutes). 

1am still working on the aforementioned 
word-processing ‘notes’ section — my 
experience with the real-time needs of the 
dimmer board program leading to some 
satisfyingly fast responses from the prog- 
ram compared to my earlier efforts. 
However, | recently found that | still had 
not entirely resolved the memory use 
question — statistics from the Liberator 
still revealed alarming heap usage when 
entering text. 

It appears that what was happening 
was this: when inserting a character into a 
string, eg c$ into 1$, originally dimen- 
sioned with DIM c$(1),1$(40), this can be 
done with a line like; 

1$=1$(1 to 5)&c$&1$(6 to 40). 

(Note: | realise this loses 1$(40), — the 
line is merely an example to make the 
point.) 

Two things, however, appear to be true: 
it is essential that 1$ was originally 
dimensioned if the text in 1$ might be less 
than 40 characters and it stops memory 
wastage to dimension two strings and 
swap them around. With, for example, 
DIM1$(40),la$(40),c$(1) the line above 
becomes: 

la$=1$(1 to 5)&c$&1$(6 to 40):1$=laS 

It may not, of course, be necessary to 
switch back to 1$ immediately —1a$ may 


become subject to another process, and 
the modified string be handed back to 1$. 
at that stage.) With all string handling 
done ina similar way, it appears that heap 
usage never increases at all once the 
DIMing has been performed. 


Nuisance 


A further programming point that may 
be of interest is that | now always use a 
procedure to completely trap all keypres- 
ses during keyboard input, ie use 
INKEY$(-1) to read each keypress even 
when, for example, calling for a filename. 
This avoids any possibility of trying to 
coerce a string and one can allow only 
specific inputs quite easily, for example, 
only one decimal point or only a minus 
sign at the start of a number. Further, the 
input can always respond to special 
keypresses such as F1 for help or ESC to 
abort — or it is easy to offer a name or 
number which vanishes if any acceptable- 
entry key is pressed. The “nuisance” is 
that deletion of errors must also be 
programmed — the editing facility of the 
INPUT statement is not, of course, avail- 
able: | usually allow only “delete left” from 
the end with CTRL «-, or just «-, and do not 
allow cursor movement along the entry. 

As will be evident, | program entirely in 
SuperBasic and rely on the Q Liberator to 
produce machine code. | have tried alittle 
Assembly code programming, and read 
much about it, but my objectives always 
seem to turn out to be some enormous 


Project, and | find the thought of working 
entirely in Assembler too daunting! | 
justify myself by arguing that one point of 
having a computer is that it works out the 
“boring coding” for you from an under- 
standable language. 

| hope this account may be of interest 
and encouragement to other QL readers. 
From a complete novice it is possible to 
Progress to complex programs that are 
really useful without too much strain. 
Apart from the original handbook, | found 
useful ideas in Donald Alcock's /i/ustrated 
Super Basic on the QL and, absolutely 
essential, in various articles in QL World 
— otherwise entirely teaching myself. | 
must admit a little pride in the range over 
which | now use my QL — wordproces- 
sing, filing, mail-merging, accounts, to 
operating and planning theatre lights and, 
now, drawing very usable maps — all 
serious jobs with very real output. The 
recent purchase of a cut-sheet feeder has 
even left me free to take lunch (or 
whatever) while the computer churns out 
my business letters! 

1am now developing my next project — 
programming for intelligent control of a 
model railway, and the electronics for 
reading data both in and out via Ser1 is 
functional. | have always had this use of a 
computer/electronics as a lurking ambi- 
tion since | first used transistors to switch 
signals 26 years ago, when, as a teena- 
ger, it was, yes, Clive Sinclair handbooks 
that led me into the mysteries of making 
transistors do things! 
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By placing a regular order with your newsagent you can be 
sure of receiving Sinclair QL World every month. Complete 
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Please reserve/home deliver ___ copies of Sinclair QL World every 


Sinclair QL World is published on the last Thursday of every month. 


Any distribution queries to: SM Distribution Ltd, 6 Leigham Court 
Road, Streatham, London, SW16 2PG. Tel: 081-677 8111. 


INTERNAL NUMBERS ON THE QL 


Integers and 
real numbers 
are two ways 
of handling 
numerical 
values. Simon 
Wallis explains 
how the QL 
uses them. 


This article shows how the QL represents 
numbers internally, explores the 
limitations of the Integer and Real 
datatypes, and implements arithmetic 
operations with unlimited precision 

There are two numeric datatypes 
available in SuperBasic. Programmers 
who have progressed from more humble 
micros to the QL may be familiar only with 
Real numbers; there are occasions when 
Integers are useful, too. An Integer, as far 
as SuperBasic is concerned, is a whole 
number between —32768 and +32767. 
These limits are chosen because they 
happen to be the largest numbers that the 
QL 68008 processor can happily deal with 
in one go. Logically, Integer operations 
should be a lot quicker than their Real 
counterparts, but SuperBasic is an 
interpreted language, so the QL spends 
most of the time when RUNning a 
program in trying to undertand what you 
want it to do, rather than actually doing it. 
If you possess a SuperBasic compiler, 
you will probably notice that the integer 
arithmetic is several dozen times faster 
than real arithmetic. 

Integers are stored in memory as one 
word (two bytes), corresponding to the 
16-bit value of the number. Real numbers, 
which can be as large as 10 to the power 
615, are stored as six bytes: four zero bits, 
12 exponent bits and 32 mantissa bits. 
The exponent Is information about the 
size of the number, and the mantissa 
stores the value. For example, in base 10, 
the numbers 2400 and 24 have the same 
mantissa (24) but a different exponent. 

If you are using a very large Real array 
which runs out of memory, it is worth 
remembering that an Integer array of the 
same dimensions will only use one-third 
of the space. 

There are limitations: If you key in and 
run listing one, the program attempts to 
calculate the hundreth number in the 
famous Fibonacci sequence: 1, 1, 1, 2,3, 


100 
110 
120 
130 
140 
150 
160 
170 
180 
190 
200 


Listing 1 - Fibonacci sequence, SuperBasic, integers. 
100 a® = 0 
110 b% = 1 
120 FOR loop = 1 TO 100 
130 ch = a® + b& 
140 PRINT 'The '; loop; ‘th Fibonacci number is '; cx 
150 a% = b%® 
160 b® = ch 
170 END FOR loop 
—— ed 
Listing 2 - Fibonacci sequence, SuperBasic, real numbers. 
100 a =O 
110 bBo 1 
120 FOR loop = 1 TO 100 
190 c=artb 
140 PRINT 'The '; loops *th Fibonacci number is '; o 
150 a b 
160 b ° 
170 END FOR loop 


Listing 3+ 


Arithmetic routines & Fibonacci sequence. 
maxlength = 20 
zeros = FILLS (*0", maxlength) 
bs = Real_to_nums (1) 
as 
FOR loop = 1 TO 100 
cf = adds (as, be) 
PRINT 'The loop; "th Fibonacci number is *y 
writenum ct; REMark removes leading zeroes 
at = bs 
be = os 
END FOR loop 
STOP 


SuperBasic 


DEFine PROCedure writenum (numbers) 
LOCal leading_zero, loop 
leading zero = 1 
FOR loop = 1 to maxlength 
IF numbers (loop) <> '0' THEN leadin, 
IF NOT( leading zero) THEN PRINT numb: 
END FOR loop 
IF leading zero THEN PRINT '0 
PRINT ' *5 
END DEFine writenum 


zero = 0 
(loop); 


DEFine FuNction add’ (numberl$, number2s) 


LOCal carry, temp_result, results(maxiength), loop 
results = zeros 
carry = 0: REMark no carry in 
FOR loop = maxlength TO 1 STEP -1 
temp_result = numeri$(loop) + number2®(loop) + carry 
IF temp_result > 9 THEN 
carry = 1 
temp_result = temp_result - 10 
ELSE 
carry = 0 
END IF 
result$(loop) = temp_result 
END FOR loop 
RETurn results 
END DEFine adds 
DEFine FuNction shift_iefts (numbers) 
Local cesults 
result’ = numbers (2 TO maxlength) & ‘0? 
RETurn results 
END DEFine shift_letts 
DEFine FuNetion multiplys (number1s, number2s) 
LOCal times_tables (9, maxlength), loop, results 
result$ = zeros 
FOR loop = 0 TO 9 
times_tables (joop) = results 
result’ = add’ (results, number!) 


result$ = shift_lefts (results) 


END FOR loop 
FUR loop = 1 TO maxlength > 
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resuits = 
END FOR loop 
680 RETurn results 

690 END DEFine muitiplys 

700 : 

710 DEFine FuNetion Real_to_nums (real) 
720 LOCal results, temp 

730 real = ABS (real) 

740 results = °° 

750 REPeat until_real_is_zero 

760 temp = INTC real/10) 

770 results = (real 
780 real = temp 
790 IF real « 1 then EXIT until_real_is_zero 
800 END REPeat until _real_is_zero 

210 results = FILLS ('0', maxlength - LEN(results) 
620 RETurn results 

830 END DEFine Reaj_to_nums 

B40: 

850 DEFine FuNotion negates (numbers) 

860 LOCal loop, results 

870 result’ = zeros 

880 FOR loop = 1 TO maxlength 

890 result# (loop) = 9 - numbers (loop) 

900 END FOR loop 

910 FOR |lop = 1 TO maxlength 
920 IF result® (loop) <> "9" 
930 results (loop) 
940 EXIT loop 

950 END IF 

960 results (loop) = 
970 END FOR loop 

980 RETurn results 
990 END DEFine negates 
1000 + 

1010 DEFine FuNction subtract® (numberis, 


acas\ resuits, times tables numoerzs\ loop) ) 


~ (10 # temp) ) & results 


) & results 


THEN 
= result® (loop) #1 


10” 


number2$) 
1020 RETurn add& (numberi%, negate’ (number2s) ) 


5, 8 etc, where each number is the sum of 
its two predecessors. You will notice that it 
soon stops with an error — the limit of 
32767 has been passed. This shows that 
although all the Fibonacci numbers are 
integers, SuperBasic's implementation of 
Integer arithmetic is not good enough for 
our purposes. 

Now try listing two. This time you will 
find that the program continues to its goal, 
but after about the fiftieth number, instead 
of printing all the digits, the output is 
truncated to six significant digits and an E 
number. So we have the hundredth 
Fibonacci number, but only approxi- 
mately. one of the limitations of Real 
arithmetic is limited precision: the QL 
performs calculations only to eight 
figures, and only shows six of them, 

Listing three solves the above 
problems. Each number is stored as a 
string; by changing the maximum length 
of the string, you can change the precision 
of the arithmetic. It's as simple as that. If 
you have enough memory, you could 
work right up to the SuperBasic maximum 
string length — imagine calculation on 
32767 digit numbers! 

The function add$ uses the same 


1030 END DEFine algorithm we humans use for adding two 
eres numbers — starting from the right, with 
[ Listing 4; Arithmetic routines in 68008 Assembly language. 
OBJECT. 6.44 + LABEL. +MEM. +. OP... eee eARGSo esa eee es COMMENT. «neue tain /sisinge 
} ZEROISE ROUTINE: TAKES NUMBER Di AND ZEROES IT 
2601 ZEROISE 0000 MOVE.L Di1,D4 
6100 008A 0002 BSR GETARG ; GET ADDRESS OF NUMBER IN Aa 
5385 0006 SUBQ.L 4#1,DS } MAXLENGTH - 1 
18FC 0000 Z2_LOOP 0008 MOVE.B 40, (Ad)+ } ZEROISE DS BYTES 
51DC FFFA 000C DBRA DS,Z_LOOP ¢ DO IT 
7000 0010 MOVEQ #0,D0 + NO ERROR 
4E75 0012 RTS ; RETURN TO SUPERBASIC 
+ ADD ROUTINE: ADDS Di TO D2, RESULT IN D3 
6100 0068 ADD 0014 BSR GETSARGS } GET ADDRESSES OF #D1,D2,D3 
7c00 0018 MOVEQ #0,D6 + NO CARRY IN 
D3acs OO1A ADDA.L DS5,A1 + POINT TO 
DSCS 0O1C ADDA.L D5,A3 END OF 
D7cs OO1E ADDA,L D5,A3 EACH NUMBER 
7E00 0020 MOVEQ #0,D7 D7 = RESULT DIGIT 
5385 0022 SUBQ.L #1,D5 MAXLENGTH - 1 
1E21 A_LOOP 0024 MOVE.B -(A1),D7 ADD. « 
DE22 0026 ADD.B -(A2),D7 «UP. 
DFOS 0028 ADD.B D6,D7 ++THIS DIGIT... 
700 002A MOVEQ #0,D6 ; NO CARRY.. 
0CO7 000A 002C CMPI.B 10,07 + +UNLESS RESULT? 10 
6B06 0030 BMI.S NOCARRY J 
701 0032 MOVEQ #1,D6 SET CARRY FOR NEXT TIME 
0407 000A 0034 SUBI.B #10,D7 
ie 
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NOCARRY 0038 STORE RESULT 


MOVE.B D7, -¢A3) 


003A DBRA Ds, REPEAT FOR EACH DIGIT 


A_LOOP 


O003E MOVEQ #0,D0 ; NO ERROR 
4E75 0040 RTS 3; RETURN TO BASIC 


3; SHIFTLEFT NUMBER D1 


3801 SH_LEFT 0042 MOVE.W D1,D4 ; GET POINTER TO NUMBER 
6101 0048 0044 BSR GETARG 3 IN A& 

5585 0048 SUBQ.L #2,D5 3; MAXLENGTH -2 

264C 004A MOVE.L A4,AB 3; A&=BEGINNING OF NUMBER 
526B 004C ADDQ.L #1,A3 3 AS= Aa+t 

18DB SH_LOOP OO4E MOVE.B (A3)+,(A4)+ 5 COPY IT 

S1CD FFFC 00SO DBRA DS,LOOPS ; 

18FC 0000 0054 MOVE.B WO, (Aad+ 3 INSERT A TRAILING ZERO 
7000 00S6 MOVEQ #0,DO 3; NO ERROR 

4E7S OO5A RTS 3 RETURN TO BASIC 


WRITENUM #CHANNEL Di, NUMBER D2 


C2FC 0028 WRITNUM OOSC MULU.W #40,D1 (CH_LENCH ) GET POINTER... 


; 
D2AE 0030 0060 ADD.L 46(AG),D1 + (BV_CHBAS ) ..TO BASIC CHAN,, 
B2AE 0034 0064 CMP.L 52(A6),D1 3 (BV_CHP 2 ..#D1 IN AO. 
6220 0068 BHI.S ERR_NO ' 
2076 1800 OO6A MOVE.L OCAG,D1.L),A0; 
2802 OO6E MOVE.L D2,D4 i 
6100 o01Cc 0070 BSR GETARG 3 GET POINTER IN A4& 
5365 0074 SUBQ.L #1,D5 3; MAXLENGTH -1 
76FF 0076 MOVEQ #-1,D3 3 INFINITE TIMEOUT 
7200 W_LOOP 0076 MOVEQ #0,D1 ; 
121c OO7A MOVE.B (A4)+,DL 3; BYTE TO SEND 
0601 0030 0O7C ADDI.B #48,D1 3 CONVERT DIGIT TO ASCII 
7005 0080 MOVEQ #5,DO 3 |O_SBYTE 
4E43 0062 TRAP “3 3 QDOS TRAP TO PRINT CHAR 
SiCD FFF2 0084 DBRA DS,W_LOOP 3; REPEAT FOR EACH DIGIT 
4E75 0088 RTS 3; RETURN TO BASIC 
TOFA ERR_NO OO6A MOVEQ #-6,D0 3; ERROR - CHANNEL NOT OPEN 
4E7S oosc RTS 3; RETURN WITH ERROR 


GETARG - TAKES NUMBER D4, RETURNS IN A4& THE 
3; ADDRESS OF THE CORRESPONDING 'LONG NUMBER’ 
49FA 0046 GETARG OO8E LEA.L NUMBASE, A4 


7A00 0092 MOVEQ #0,DS ; 

SA2C FFFE 0094 MOVE.W -2(A4),D5 3 MAXLENGTH 

cecs 0098 MULU.W DS,D4 3 MAXLENGTH * NUMBER 
Dec4 OOSA ADDA.L D4,A4 3 ++ + NUMBASE 

4E7S oosc RTS : 


ET3ARG: TAKES 3 ARGS D1,D2,D3, RETURNS ADDRESSES 
IF CORRESPONDING LONG NUMBERS IN A1,A2,A3 


2801 GET3ARG OOSE MOVE.L Di,D4 3 GETARG TAKES D4 &.. 
6100 FFEC O0AO BSR GETARG 3 «+ RETURNS A4, BEING.. 
224C OOA4 MOVE.L A4.AL 3 THE POINTER TO THE.. 
2802 OOAG MOVE.L D2, D4 3 ++ BASE OF NUMBER#D4. 
6100 FFE4 00A8 BSR GETARG ; 

244C OOAC MOVE.L A4,A2 ; 
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NUMBASE OOD6 
END 


100 Set_up_Mcode 

110 CLs 

420 Real_to_num t, 4 

130 zerolty 2 

140 FOR loop = 1 to 100 
a 


190 copynum 2, 3 


210 STOP 


Integer Arithmetic Routines 
edure zeroify (number) 
SE, numb 
1030 END DEFine zeroity 
1040 + 
1050 DEFine PROCedure writenum (channel, number) 
1060 CALL BASE + 92, channel, number: PRINT #channel 
1070 END DEFine writenum 
4080 + 
1090 DEFine PROCedure copynum (numi, num2) 
1100 CALL BASE + 184, 0, 0, numi, numz 
1110 END DEFine copynum 
41120 1 
4130 DEFine PROCedure add (numi, num2, numa) 
4140 CALL BASE + 20, numi, num2. numa 
1150 END DEFine add 
1160 + 
1170 DEFine PROCedure shift_left (number) 
1180 CALL BASE + 66, number 
1190 END DEFine shift_left 


4250 add num, loop-1, loop 
1260 END FOR loop 
1270 zeroit 
length © numz 
6 


p 

1300 shift_iert num 
add 10 + peek (loop + num2ba 

1320 END FOR loop 

1930 END DEFine multiply 

1340 + 

1350 DEFine PROCedu 

1360 LOCa! PTR. 109) 

1370 real = abs rei 

1360 zercity number 

1390 FOR loop = 1 to LENireal) 


num (real, number) 


1430 END FOR Joop. 
1440 END DEFine Real_to_num 
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= 1), numa, num 


Listing S: SuperBasic + Machine Code, Fibonace! sequence using Large Numbers, 


loop: ‘th Fibonace! number is exactly ‘i 


R 1 
PTR = NUM_BASE + number » maxlength 


2803 OOAE MOVE.L DS, D4 3 
6100 FFDC OOBO BSR GETARG : 
264c OOB4 MOVE.L A4,AS ; 
4E7S OOBG RTS ; 

+ COPYNUM D3 TO NUM D4 
2E04 COPYNUM OOB8 MOVE.L D4,b7 3 
6200 FFD2 OOBA BSR GETARG 3 ARG D4 
204C OOBE MOVE.L A4,A0 3 STORE POINTER 
2803 O00CO MOVE.L D3,D4 3 ARG D4 
6100 FFC ooc2 BSR GETARG : 
5385 OOc6 SUBQ.L #1,D5 3 MAXLENGTH -1 
16D8 C_LOOP OOC8 MOVE.B (AO)+,(A4)+ 5 COPY #D4 TO #D3 
51CD FFFC OOCA DBRA DS,C_LOOP i; REPEAT FOR REST OF NUMBER 
2807 OOCE MOVE.L D7,D4 i 
7000 OODO MOVEQ #0,D0 3; NO ERROR 
4E75 OOD2 RTS i RETURN TO BASIC 
0014 MAXLEN OOD4 DC.W 20 ; 


carries, etc. The function multiply$ uses a 
modified version of the ‘long 
multiplicaiton’ algorithm. This is not the 
most efficient algorithm but it is easy to 
understand. First it creates a “time-table” 
of the first argument. Then it goes along 
the second argument from left to right, 
adding the correct multiple of the first 
argument (found by looking up in the 
table) to the result, then multiplying the 
tesult by ten (by shifting it left). Try 
following this yourself, by hand, if you 
don't understand it at first. 

The subtract$ function works by 
negating the second number, then adding 
this to the first. To negate a base-ten 
number, you substract each digit from 
nine, then add one to the result. This 
technique has been used for years to 
store negative binary numbers, but is 
rarely used for base ten. 


Seconds 
\fyou run listing three, you will finally get 


1210 DeFine PRaCedure muletply, Counts, pond, nueas your result: the hundredth Fibonacci 
1220 LOcal loop, numzbase he number is calculated in seconds. These 
1230 zeroify 10 it i 

1200 FOR loop = 11 To 10 routines are fine if all you want to dois add 


numbers up, but if you try some 
multiplication you may have a long wait. 
The multiplication algorithm above 
perfoms ten additions to set up the table, 
then as many additions as there are digits 
in the result. Thus the performance of the 
multiplication routine depends critically 
upon the addition routine. Because of this 
| have recorded the addition routine in 
machine-code. x 


1400 temp = INT (real/10) : REMark don*t use DIV Accessing SuperBasic strings from 
PaEG) coRd tang een teneeh ~A1SSP ere) = (10a ceays machine code would rob the program of 


the speed gains it is trying to achieve,so 
the second version of the program stores 
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PERSONAL ORGANISER 


The new Portfolio from Atari is the world's first pocket- 
sized electronic organiser that is also a powerful PC 
compatible computer, with a full QWERTY keyboard 
and scrolling 80x25 character display. 


Portfolio includes everything you would expect from an 
electronic organiser - an address and telephone book, 
time manager, diary and sophisticated calculator. 


Portfolio also includes several functions that you would 
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And, because Atari's Portfolio is PC compatible, it can 
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office. You can transfer files from one to the other, to 
enable you to update your reports and figures with the 
Portfolio while you are on the move. 


Into! 80C88 at 4.9152Mh2 
Compatible with MS-O08 2.11 
256K containing BIOS, operating system 
‘and applications suite 
128 with an intemal RAM disk, configurable trom 
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(63 keys, QWERTY, IBM PC BIOS compatible, 
Buried numeric pad and function keys, Optional key click 
Extended IBM ASCII (255 charactors) 
credit card sized memory cards (32K or 
84K oF 128K RAM) 

Graphics LCD, supertwist technology, MOA com: 
patible, 40 columns x 8 lines, 240 x 64 pixels (with the 
‘option to window a {ull 60 x 25 character display) 
Keyboard controlled contrast. 
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communications software, 


{n addition othe excellent sotware but.in to the Porta Free 
of Charge (see right} other sofware and peripheral produc uch 

2 the sophisticated Pocket Finance package and salaries 

intertaces are avalabe, And it dost top there. Many manufac: 

lurers have recognised the potential ofthe Porttotio and have = 

already saved io design new peripherals and software Producls POWER SUPPLY. ANTERFACES @ PERIPHERALS 
utretiy under development include: Sera interface with bult |] Porto can mre and ratiove daa nnd! programe ram Portis powefed by ve AA banal which rus Porto ean commune wi her compu 

in mini modem, Apple Macintosh interface, business, uty and | J sownAMt x hom ama ch card wee memory eat, fr Upto ab wed WN neal Ue, oom The mainaus- ports a growing ange peripherals aa ulm 9 
programming software plus a range of adventure and bate | J) Ylorinaisbuttncard drive. Te cardsare avaiable 0 a 3 ua connate, Feroharai wilableJnclide bial tnd 
Atralegy games. Fo urher ree deta on the Potato range, tt | vee sen 32K, 64K and 128, bo youcan cary airy. te Papel ed ply Dey rt mig heen 


required 
(the coupon below and return it to Silica Systems now. Ren incerta ae nt ae: bon IPMN DOS noe ee 


5 Ww C\ ‘TCRAC > = i MAIL ORDER: 14 The Mews, Hathert Rd, Sidcup, Kent, DAI4 40X Fer: 081-309 1117 
| SILICA SYSTEMS OFFER YOU || se ee EE 


Mon-Sat a305m600pm {ate Wight! Thursday tint Spm Fax Nov" O7-229 4797 


FREE OVERNIGHT COURIER DELIVERY: On all hardware order lipped in the UK. rate — 

TECHNICAL SUPPORT, HELPLINE: Tout or War! etice) sen eae SIOCUP SHOP: au htt Mews, Father Ad, Sidcup, Kent, DATA AOX To, 61.902 681i 
PRICE MATCH: We normally malch competiors on'9 "Same product « Some price” basis. eS ECUEATIOR, ae ens Hae ee Sie tee DTT ene 
ESTABLISHED 12 YEARS; Proven track record in professional computer sales Ordo Ue Opom Mon Ft bddamé gm Eided th Sutdoye os No of 08 One 


£13 TURNOVER (with 60 staff): Solid and reliable with maintained growth. 
BUSINESS/EDUCATION/GOVERNMENT: Volume discounts available for large orders. 
SHOWROOMS: Demonstration and training facilities at our London & Sidcup branches. 
THE FULL STOCK RANGE: All of your Atari PC requirements from one supplies, IRIAN gc! 7} TT ARIES ERT 
FREE CATALOGUES; Will be mailed to you with offers and software/peripheral details, PLEASE SEND INFORMATION ON PO I 
PAYMENT: By cash, cheque and all major credit cards. Ml is a _ _ - 
CREDIT PAYMENT TERMS: Silica are licensed credit brokers - details on request. 
Betore you decide when to buy your naw Aur Portlo, we suGgest you think very careuly about WHERE you I 
buy i. Consider what til be hike few months er buying your Portola; whan you may reg Aaldress: 

Peripherals orsoltware, or help and agvi with your new purchsse. And, wl ne cortpany you buy I I 


——— 
Fro:siica Shop Ltd., Dept QLW 10/90-29, 1-4 The Mews, Hatherley Road, Sidcup, Kent OA14 4X. 


i) 


RTE 


Initials: 


Mr/MrsiMs Surname: 


You with details of new Portfolio products? At Sica Systoms, we ansure that you will have nothing Yo Worry about 
Silica Systems is a new division of Silea Shop, the UK's leading Alari specialists, This new division, 
{tablished lo provide a servic to the more serious home user, a8 well as to business and education purchasers 


sieresnmpermeremvnte ten SILICA 


Geass whee Saend's noe ut cen I 


Just tak our word for i. Compote and relurn the Company Name: 
‘coupon naw, or ou latest Free Merature and Begin 
to experiance the "Silica Systems Service l Which computer(s), if any, do you own? 


| Postcode: 


Tal (Home): Tel (Work) 


the numbers directly in memory. The 
algorithms used are the same as the ones 
used in the SuperBasic implementation, 
so | shall not describe them agin. Listing 
four contains the source code, well 
documented. Listing five loads the 
machine code routines into memory. 


1450 + 
1460 DEFine PROCedure subtract (num, numZ, num3) 
1470 LOCa! loop, numZbase 

1480 numabase = NUM_BASE + maxlength * nung 

1490 copynum numa, num2 

1500 FOR loop = 0 TO maxiength 
1510 POKE (num2base + loop) . 9 - PEEK ( num3base + oop) 
1520 END FOR loop 

1530 Keal_to num 1,10 

1540 ADD 10, numa, 12 

1550 ADD numi, 11, numa 


Calculator 1560 END DEFine subtract 
is70 + 
1800 DEF ine PROCedure Set_up_Heode 
‘To,show offithe:new. routines; listing 1500 LoGal loap, checksums totals loopZ. data_tten 


six turns the QL into a pocket calculator. 
The variable maxlength must not be 
changed in the middle of the program, and 
remember that because of the ten 
numbers used by the multiply routine, you 
must have space in memory for at least 
twenty numbers. So, on an unexpanded 
QL, you are limited to operations on 
numbers only about 4000 digits long. This 
should be sufficient for most calculations. 

If the program had been left entirely in 
SuperBasic, it would have worked 
correctly, but not fast enough (especially 
for multiplications) for any practical use. If 
one had attempted to recode the entire 
program in assembly languauge, the 
program would probably never have been 
finished, as it takes a long time to write 
and debug machine code. However, by 


be cun FIRST in any program. 
this. min = 2, max = thousands 


1600 REMark This procedure must alwa 
1610 maxiength = 20 : REMark can c} 
1620 BASE = RESFR ( 216 + 20 * max! 
1630 RESTORE 

1640 FOR loop = BASE TO (BASE + 204) STEP 12 

1650 total «0 

1660 FOR loopz = loop TO (loop + 10) STEP 2 

1870 POKE_W loop2, data _item 

1680 total = total + data_item 

1690 END FOR \oop2 

1700 READ checksum 

1710 IF checksum <> total THEN PRINT ‘DATA ERROR’ :STOP 


1720 END FOR loop 

1730 NUM_BASE = BASE + 210 

1740 POKE W NUM_BASE - 2 , maxiength 
1750 RETurn 

1760 DATA 10241, 2032, 138, 21381, 
4770 DATA 20941, -6, 
1780 DATA 3i7a4, -11 ‘ 
1790 DATA 7713, -8670, -ea42, 3i7a4, 
1800 DATA 27398, 31745, 1031, 10, 5895, 
1810 DATA -24, 26672, 20085, 14337, 24832, 72, 87934 
1820 DATA 21893, 9804, 21131, 6363, 20941, 

1630 DATA 6396, 0, 26672, 20085, -15620, 

1640 DATA -11602, 48, -19794, 52, 25121 
1850 DATA 6iaa, 10242, 24832, 26, 2138 
1860 DATA 29184, 4636, 1537, 48, 26677, 
1870 DATA 20041, -14, 20085, 26922, 20085, 18938, 106957 


6396 


coding first in a high-level language Inee Een Preps 8780, 10 
1900 DATA -28, 9202, 10203, 2aa3z, 


(SuperBasic), the replacing the critical 
parts of fast machine code, we get the 
best of both worlds — the most power 
from the QL, with the least effort. 


1910 DATA 20085, 11760, 24832, -46, 
1920 DATA 20832, -54, 21381, 6360, 20941, 63703 
1930 DATA -4, 10247, 26672, 20085, 20, 0, 59020 

1940 END DEFine 


Listing 6: Cal-QL-ator; Needs listing 5 to run. 
100 Set_up_Mcode 
110 Set_up_Screen 
120 REPeat main_loop 
130 key = CODE (INKEY# (-1) ) 
140 SELect ON key 
150 » 48 TO 57: number_pressed 
160 = equals, enter : equals_pressed 
170 = plus, minus, times : operator_pressed 
180 END SELect 
END REPeat main_loop 
DEFine PROCedure number_pressed 
IF op = equals THEN 
op = plus 
zeroify displayed_num 
zeroify current_num 
END IF 
shift_left current_num 
POKE NUM_BASE + maxlength * (current_num + 1) 
PRINT CHR# (key); 
END DEFine 


DEFine PROCedure work_it_out 

SELect ON op 

= plus : add displayed_num, current_num, result 
minus : subtract displayed_num, current_num, result 
times +: multiply displayed_num, current_num, result 
equals : copynum result, current_num 

SELect 

DEFine 
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DEFine PROCedure operator_pressed 
PRINT * *; CHR$(key); % '3 
work_it_out 

copynum displayed_num, result 
ZEROIFY current_num 

op = key 
END DEFine 


DEFine PROCedure equals_pressed 
RT? itty 

work_it_out 

writenum #1, result 

copynum current_num, result 

op = equals 

END DEFine 


DEFine PROCedure Set_up_screen 
LOCal loop, loop2: MODE 4 


equals CODE ¢ 2: plus = CODE (’+*): enter = 10 

minus CODE (’-'): times CODE (’#') 

result = 0: displayed_num = 1: current_num = 2: op = plus 
zeroify result: zeroify displayed_num: zeroify current_num 


OPEN #1, con_400x240a56x16: PAPER 4: CLS 

CSIZE 3,1: INK O 

AT 6,0: PRINT ’ TP EPR SRN Ra GF Gg. oF NK # 
REMark 2 spaces between each symbol in previous line 
FOR loop = 110 TO 230 STEP 40: BLOCK 236, 4, 16, loop, O 
FOR loop = 10 TO 294 STEP 48: BLOCK 6, 124, loop, 110, 0 


CSIZE 0,0: AT 10,2: PRINT *Cal-QL-ate: Max length = '; maxlength 


WINDOW 390, 94, 60, 16: INK 7: PAPER 0: CLS: BORDER 2,2 
END DEFine 
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‘This space ts donated in the interests of high standards In adveitisements, 
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INFORMATION: 
Program: Spellbound 2 
Price: £50 

Supplier: Sector Software, 


Unit 13, Centurion Way 
Industrial Estate, Farington, 
Leyland, Lanes PR5 2GU. 
Tel: 0772 454328 


he original version of 

SpellBound _ obvi- 

ously met a consider- 

able need within the 
QL community. There were 
many interested spectators 
around the Sector Software 
stand at the Microfair when it 
was introduced, and the prog- 
ram has proved to be a good 
seller. Surprisingly, it has sold 
much better than FlashBack, 
which seems to fill a more 
important niche in the software 
market. Maybe this goes to 
show how little software wri- 
ters, suppliers, and reviewers, 


SPELLBOU 


know of what users really want. 

One feature of Spel/Bound 1 
which gave it considerable 
appeal was the immediate 
nature of the spelling checking; 
it was right there with the 
writer, following every keys- 
troke and commenting as soon 
as it didn't like one of them 
This was a feature | had diffi- 
culty getting along with, and no 
doubt many other users also 
made their feelings known; we 
wanted to be able to check 
existing files, rather than new 
ones. There was little doubt 
retrospective checking would 
be a feature of a revised Spell- 
Bound, the only question being 
when, and if, the revision 
would appear. Since the origi- 
nal introduction, QJump had 
looked at SpellBound, found 
various aspects of it that were 
considered unsatisfactory, and 
introduced Q7yp. 

Among the advantages 
QTyp has is the ability to check 
existing files, at high speed. 
Although FileBound came 
along and enabled SpellBound 
to handle existing files, the 
process can hardly be called 
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speedy, and it has a few quirks. 
Fortunately for Sector, Spell- 
Bound had established a size- 
able base of faithful users, and 
QJump never seemed to make 
any serious attempt to market 
QTyp to the total QL market; 
this gave plenty of time to 
come up with version 2 of 
SpellBound. 

There has been one other 
competitor, though. This is still, 
in essence, QTyp, but inte- 
grated into the text®” word- 
processing program. This ver- 
sion of QTyp is somewhat 
simpler than the stand-alone 
version; it works well, but it 
does not provide as-you-type 
checking of spelling and is 
really only intended for use 
with text®”__T87 files, You can 
actually check anything that 
can be loaded into text®’, and 
that includes Quil/__DOC files, 
but this really doesn't basically 
affect the market for Spell- 
Bound 2, which must largely be 


those users who have never 
changed from Quill. You can 
use the standard 2.35 Quill, or 
the version patched to run from. 
EXEC as well as EXEC_W. 
Quill treated with Turbo-Plus is 
also acceptable. 

There should not be any 
compatibility problems with 
earlier versions of Quill; cer- 
tainly 2,30 should be alright, 
but it might be worth asking 
about versions earlier than that 
(better still, get rid of them!) 
Although it is aimed at Quill 
users, the program can be 
used with other programs; it 
works in both concurrent and 
retrospective modes with 
text®” and The Editor, but the 
user needs to bear in mind that 
there are codes within a__T87 
file which are not displayed on- 
screen, but will be seen by 
SpellBound, There does not 
appear to be any problem 
using the program in a system 
fitted with a Minerva rom, 
although revisions of the latter 
come out faster than software 
writers can be expected to 
keep pace with. 

What is new or improved for 
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the user? Retrospective 
checking has been mentioned, 
and that has to be the major 
new feature. During concur- 
rent checking, the tendency 
the program had to switch off 
when it detected _non- 
alphanumeric keypresses, and 


ND-2 


the need to use the command 
keying to restart it, was a 
constant irritation. This situa- 
tion has now been improved, 
with there being less tendency 
to drop out, and restarting 
occurring automatically when 
Space is pressed (and most 
users won't type far without 
hitting Space), 

As befits this bigger-is-better 
era, an alternative, larger dic- 
tionary is provided, with 
50,000-plus words as against 
the 30,000 of the standard one. 
You can use whichever one 
you prefer; put another way, 
whichever your QL's memory 
can hold. “Sinclair” is in the 
standard dictionary, suggest- 
ing that it is of more practical 
use than most. Loading of the 
dictionary file is quicker, and 
automatic; the file “dictionary” 
is loaded by default, but you 
can choose to rename any 
other dictionary file to that 
name if you want to. 

Another big improvement 
shows when saving the current 
dictionary — the act of saving 
no longer disables  spell- 
checking. There is no need to 
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read the dictionary back in 
again to do some more check- 
ing, as it remains there after a 
save; this means that you can 
make precautionary saves 
whenever you wish, without 
the action disrupting checking 
work, 

The checking modes have 
been reduced by one, Mode 5 
being removed because it was 
considered of little interest to, 
users, The modes are selected 
by CTRL F1 to F4, with the 
default being Mode 3 (CTRL 
F3), SpeliBound now has three 
states: off, with nothing hap- 
pening or visible; on, but 
“asleep”, with its cursor 
flashing; on, and checking. 
You get from the sleep to 
active state by pressing 
Space, and back to the sleep 
state by ALT-ESC. The box for 
displaying suggested spellings 
can be moved around the 
screen, and re-sized, using 
CTRL-M followed by the stan- 
dard cursor-and-ALT key proc- 
edure (as in FlashBack). 

Preparation of a working 
copy is Straightfoward. You 
can incorporate SpellBound 
into a system boot routine, to 
have it available all the time. 
The program file is about 23 
KB in size, and the two diction- 
ary files are 59 KB and 107 KB. 
When loaded, the space taken 
is about 170 KB with the stan- 
dard dictionary, and 250 KB 
with the larger one. The main 
reason the figures don't add up 
is that the files have to be 
uncompressed in memory for 
use, and they then take up 
roughly twice as much space 
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Bryan Davies 
tries out a new 
attack on the 


typos. 
as they do on disk. Your QL 
definitely needs memory 
expansion! 


SpellBound is a stand-alone 
program, so you don't have to 
run your WP program to check 
spelling in existing documents. 
You simply load SpellBound, 
and start it by keying CTRL O, 
as before. Keying CTRL F then 
brings up a menu of options for 
checking existing files — 
MARK, Y/N ADD, AUTO ADD, 
UNMATCHED, START HERE, 
ESC. You key the first letter(s) 
of the required option(s), then 
press ENTER, to _ initiate 
action. ESC gets you back out 
of the menu. Any tendency to 
forget to key ENTER is coun- 
teracted by that word moving 
from side to side on the menu, 
then growing in size and being 
accompanied by beeping, to 
attract your attention. 

You can select any compati- 
ble combination of choices 
from the menu — for example, 
MARK and Y/N ADD. If the Y/N 
ADD option is chosen, every 
instance of a word unknown to 
the dictionary produces both 
that word and a prompt mes- 
sage in the familiar box at the 
middle, bottom of the screen. 

The (“hat") character is 
displayed at the point in the 
word where  SpellBound 
decided it was unknown, Being 
faced with a word and a ques- 
tion concerning it, without 
seeing the context, makes me 
uncertain as to how to react; 
there are differing uses for 
some combinations of charac- 
ters, which might lead you to 
accept/reject them, then find 
your choice was wrong. 

When the document being 
checked is a Quill one, this 
difficulty can be overcome by 
loading the document into Quill 
beforehand, so that you see 
the full screen of text as well as 
the SpeliBound window, The 
text is made to page up the 
screen to keep in synchronism. 
with what is being checked, by 
putting Quill into Search mode, 
a very neat touch. Words are 
displayed in the actual case 
and, as before, words begin- 
ning with capital letters or 
ending with full stops bring up 
additional questions — should 
the word always start with a 


Sinclair/QL World October 1990 


capital (proper noun), or end 
with a full stop (in which case it 
is an abbreviation)? This func- 
tion seems very basic to spell- 
ing checking, yet only Spell- 
Bound (of the checkers | recol- 
lect seeing) has it. 

When you are not certain of 
the spelling of a word, the 
Examples screen can be dis- 
played by keying CTRL E; you 
can page down the examples 
by keying SHIFT DOWN, or 
move one ata time with the up/ 
down cursor keys. If you wish 
to replace your spelling by that 
of an example, you move the 
cursor until the chosen exam- 
ple is highlighted by a white 
underline, then press ENTER, 
and that word takes the place 
of the error word in the text. 

The speed of checking a 
document is basically up to the 
user — the faster you give 
answers to the questions, the 
sooner the job is finished, As 
the text files are notin memory, 
the media influences the 
speed, With hard disk, the 
delay in moving from one 
unknown word to the next is 
slight, but microdrives give 
noticeable pauses as the next 
block of text is moved into 
memory. When there are many 
unknown words, the overall 
rate may be only 20-30 words 
per minute, but it rises to 
several thousand words per 
minute if there are few 
unknown words. Choosing the 
MARK option demonstrates 
the speed very effectively. An 
1800-word file was marked 
(which included writing-out the 
marked version) in 10 seconds 
— over 10,000 words per 
minute. This is one of those 
functions where benchmark 
speeds are pointless, once a 
certain performance level has 
been reached; SpellBound 2 is 
as fast as it reasonably needs 
to be. 

Documents checked with 
the MARK option need to be 
loaded back into Quill, to make 
any changes deemed neces- 
sary. SpellBound helpfully 
asks if you want to load the 
document into Quill, immedi- 
ately the checking is finished, 
and loading is done for you if 
you answer “Y" (provided Quill 
is already running). The 
marked document has the 
extension _CHK, but the Quill 
Load function is quite happy to 
accept that. Quill is placed 
automatically in Search and 
Replace mode, so that it will 
remove the (“hat”) charac- 


ters. Whenever you need to 
edit a marked word, you press 
ESC, make the change, then 
press F5 to resume the Search 
and Replace operation (this 
procedure works only if Spell- 
Bound is in Mode 2 or 3). A 
vetted document can then be 
re-checked using the AUTO 
ADD option, which causes all 
unknown words to be be 
entered into the dictionary. The 
speed here is roughly the 
same as for the MARK option. 
Overall, you will probably get 
the job done quicker by keep- 
ing it to one operation — Y/N 
ADD — but the MARK/AUTO. 
ADD route does allow you to 
see the full text with the 
marked words, before risking 
adding anything to the diction- 
ary. 

The program is nothing if not 
flexible. In case the two 
approaches already men- 
tioned are not to the user's 
taste, there is the 
UNMATCHED option. This 
creates a file containing only 
those words which were not 
found in the dictionary. The 
creation speed is about the 
same as noted with the other 
functions, The file can then be 
loaded into your WP program 
for editing, and the words 
added subsequently to the dic- 
tionary using the AUTO ADD. 
option. One more option is 
available. There may be times 
when you do not want to check 
the whole of a document, and 
you can restrict SpellBound’s 
interest to a given section by 
typing-in “StartHere" at the 
relevant start-point in the docu- 
ment, and selecting the 
START HERE option, such as 
Y/N ADD. The “StartHere” 
addition is removed from the 
document automatically during 
checking, 

There seems little reason to 
comment much on SpellBound 
2asaconcurrent checker, as It 
is basically the same as ver- 
sion 1. There was not much 
need to make changes, with 
the obvious exception that the 
“hypersensitive” behaviour 
needed calming down some- 
what, and that has been 
achieved. Even if you forget to 
hit Space to switch checking 
back on as soon as you have 
moved the cursor away from 
the current text-insertion point, 
itis virtually certain you will hit 
Space after typing a few more 
characters so that only an odd 
word will not be checked. To 
make certain you don't get into 


the habit of ignoring the chirps 
from the QL when an unknown 
character combination occurs 
with Mode 3in use, you can still 
change to Mode 4 and have 
the keyboard disabled with the 
cursor on the questionable 
character, so that you are 
forced to pay attention to it. A 
fast typist is unlikely to accept 
the intrusion of concurrent 
checking, but most of us are 
pretty slow on the keys and will 
be warned of potential errors 
before we have typed more 
than a few other characters, 
Either way, there is a Mode to 
‘suit your style. 

A few odd quirks still exist. 
When trying to load a diction- 
ary file, if the file named does 
not exist you may have diffi- 
culty proceeding; ESC or 
ENTER fail to get you away 
from the prompt, and what is 
required is the up/down cursor 
key. Hopefully, this point will be 
made in the instructions (not 
available during the review). 
You need to de-activate Spell- 
Bound with ALT-ESC before 
switching to another program, 
to avoid losing it altogether. It 
would help if an option were 
added to ignore specific 
strings, that occur repeatedly 
but are not wanted in the 
dictionary. 

SpellBound 2 is a consider- 
able improvement over version 
1 and should now be suitable 
for virtually all Quill users. It is 
also suitable for The Editor and 
text®”, although you don't get 
some of the nice touches with 
them that are provided when 
using Quill. With any spelling 
checker, the decision as to 
whether it is needed at all is a 
personal matter; if you feel 
sensitive about the impression 
you give to other people when 
your letters, etc. contain spell- 
ing mistakes — or typographi- 
cal errors — this program is 
well worth having. If you don't 
believe you make “typos”, try 
taking another look at some old 
documents; if you don't find 
any mistakes, the chances are 
you are not looking closely 
enough. Maybe you would just 


_ like something to make Quill a 


bit more interesting — the cost 
of SpellBound is still low 
enough for some users’ “dis- 
cretionary" budgets, although 
itis quite a bit higher than it was 
(QL users will have to get used 
to higher prices, or it won't be 
worth writers and suppliers 
Producing new things for the 
smaller market). 
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SiGRODRIVE EXCHANGE 


B = SuperBasic; A+O = assembler and object code; M+B = machine code 
and Basic loader; A+-8 +O = assembler and Basic loader and object code; S = 


supercharged; L'= QLiberated; {1 = monitor mode; {2 = TV mode. 


Established QL a Sector Software are duplicating 
and distributing Microdrive Exchange programs, and sup- 
plying 3.5 inch disks. Please read the small print carefully, as 
different action is needed depending on whether you want 
mdv or disk copies. Sector can now supply microcassettes 
at the old price of £2. 


| understand that Sector Software undertake only to supply 
these programs, and accept no liability for operation as 
defined by the authors. QL World cannot supply information 
about the programs other than that originally printed or 
supplied, 

Any article reprints must be ordered and paid for separately 
at £2 each (£3 overseas) from Sinclair QL World at the 
Editorial address. 


HOW TO ORDER 


The Microdrive Exchange will copy the programs of your 
choice onto Sinclair microdrive cassette or 3.5 inch disk. 
Please note we can only supply ONE PROGRAM PER MDV 
OR DISK. 

Orders for programs on DISK can only be supplied on the 
X’s own disks, priced at £1, one disk per program 
ordered. Please do NOT send disks. Please state any 
specific density requirements for your set-up. Microcasset- 
tes cost £2 each, 

Please send your orders to Sector Software, Unit 13, 
Centurion Way Industrial Estate, Faringdon, Leyland, Lancs. 
PR2 2GU. Tel. 0772 452414. Access/Visa accepted. 


ORDER FORM 
Value of programs ordered 


| require one microcassette/one disk 
for each program ordered (delete as 


applicable) 

No. of 3.5in. disks required @ £1 each &.. 

No. of mdvs required @ £2 each on 
Post and packing £.75p 
15% VAT carey 
TOTAL 


| 

I 

I 

| 

! 

I 

| 

I 

I 

PROGRAM IDENTITY NUMBERS: | 
Daman ai YR Mion enter Ae I 
NAME | 
I 

I 

I 

| 

I 

I 

| 

! 

| 


ADDRESS (avock capitats PLEASE) «... 


ww. Postcode ... 
ACCESS/VISA NUMBER IF APPLICABLE: 
] OOCL ] 


Please copy on to mdv or disk the programs 
which | have indicated. | enclose a cheque/PO/ | 
Access or Visa number to the total of £.......,.. | 
payable to Sector Software. 


a a a ee 


THE ae 


1. LEAGUE SECRETARY by C.B. Storey (B) £3 
You enter the match results and this program updates the league 
tables. Suitable for any sporting league organised on the lines of the 
Barclays Football League. Mdv only at present. 

2. THE DOUBLE by P.G. Ives (B12) £4 
A large football strategy game. You manage a team through four 
divisions, buying and selling, boosting morale through the league and 
F.A. Cup season. 

3. SUPERBREAKOUT by R. Davidson (M+B) £2 
Fast m/c version of the classic bat, ball and wall game. Optional 
double bats and/or balls. 

4. SPACE PODS by Simon Quinn (M+-B) £3 
You lone ship must protect six energy pods against the aliens. 
Machine code. QL World, December 1987 

5. GRAPHIC WRITER by S.M. Walker (B) £2 
A graphic design program which can save your pictures as 
SuperBasic commands for use in other programs. QL World, 
December 1987. 

6. ZAPMAN by L. Miles (M+B) £3 
Fast-action m/c version of the Pacman genre. Variable skill levels and 
maze formats. 

7. SPACE INVADERS by Paul McKinnon (M) £3 
Very fast, challenging version of the classic, with ugly aliens and 
protective shields. 

8. SPELLED by Timo Salmi (T) £3 
A complete spelling checker for Quill_tist files, 7,500 words 
automatically expandable. Required two cartridges and 512K expan- 
sion. 

9, ADVENTURE PLAYTIME by A.Pemberton(B)MDVonly £3. 
‘An extensive adventure where you must complete tasks for the 
inhabitants of a strange land, Coded messages and hints included, 
10. YAHTZEE/GIRO by Jason Price/Henry Wrighton (B) £4 
The popular dice game with instructions and graphics, for one or more 
players. QL World November 1987. Also space-disaster rescue 
game, in zero-gravity, QL World December 1989, 

11. LOCK AND KEY by Henry Wrightson (B) £3 
Unlock the secrets of eight screens of platforms, ladders, keys, poison 
weeds and mixed fruit — against the clock. QL World February, 1990. 
12. RADAR by Nigel Ford (B) £2 
You are control, monitoring the skies, checking aircraft, scrambling 
jets to intercept UFOs and shooting down enemy aircraft. 

13. TAKTIX by Nigel Ford (B) £3 
Six or more can play the computer in a fierce game of European 
conquest. Put aside at least an hour. QL World July, 1988. 

14. BRIDGE by Peter Etheridge (B) £4 
Excellent version, including accurate bidding, automatic or manual 
card play, replay hands, save and loads more. 

15. CONQUEST by Andrew Pritchard (T) £4 
“Superb graphics, with lots of original ideas. The best strategy game 
I've reviewed for QL World. 

16. MOLECULAR GRAPHICS by Mark Knight (M, B) £4 
Molecular structures of any compound can be saved, reloaded, drawn 
and rotated on screen. “Excellent, one of the best educational 
programs on the QL." Disk or 2 cartridges and 512K needed. 

17. SPEEDMIND by William Henderson (B) £3 
‘A mastermind-style game played with coloured pages. You have 12 
attempts at breaking the code against the clock. QL World, January 
1988 

18, STELLARIS by David Carmona (Bf 1) £4 
Real-time space adventure against the computer, including economic 
simulations, lunarlanding and superb graphics. QL World, June 1987. | 
19. BUSINESS GAME by David Smith (B) £4 
A business simulator for any number of players, human or computer. 
The winner is the one who makes the most money! Networking advice 
from author. See QL World, April 1989. 
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EEC LTD 
MAIN SUPPLIERS OF SINCLAIR QL COMPUTERS & LOW- 
COST PRINTERS - QLs From £90 PRINTERS From £80 


‘THE EXPANDABLE SYSTEM FOR SMALL BUSINESSES, BEGINNERS, AND EXPERTS, 
(Qle COMPLETE Fully tested and with 3 months warranty. TV lead, OL Sofware 
2.38. Also complete bound user guide for the OL, SuperBasic forthe software: Quill JM ROM £120 
(word processor) - Abacus (epreadsheet) ~ Archive (fecords) - Easel (busineas 
‘graphics). JROM £135, 
CUSTOMERS BUYING ONE OF THE COMPLETE UNITS ARE GIVEN ONE TEARS PRE 
MEMUERSHIP TO QUANTA. (Help, Newaletiers & 400% Library Programs - most Free) 
‘QUANTA MEMBERS CAN OBTAIN A £5 DISCOUNT 
BACKUP OL the OL wih Power Supply Unit & TV Lead. Keep it as insurance, 
cor for networking, cheaper than changing 10 another system. 


NEW OFFER 
MM 2.5" (MOT LIFETIME) DISK DRIVES Idoal for QL. users looking for an inexpensive, 
‘complete ni with PSU Maina Load & Switch, FREE Disk, Dust cover & comprehensive instructions 
OLtesdifregd £12 


IM.Rom £90 
35 ROM £100 


"ACCESSORIES & SPARES 
1. Puion software 2.38 pack £20.00, or separate programs each £10.00 
bound wer gui. £7.00” Qu power supply unt. 12.00 
ovaticks Contronica mertace 24.00, 
MC 88000 micropiscetacr Sena! printer loud. 12.00 
Keyboard membrane ‘Zc or 26908 wach 0 
(Cartridges, Walets of, New. ‘{Unsued progeartidgee ‘ 
Bnew earindges in pasties ‘86.00 
SOFTWARE 
(QU.Cash Trader, Decision Maker, exch...£28.0008 Q_Liberator Superliaic Compile... £60.00 
‘Touch & Go (Fyping Tutor) Ol. Games Cartage Olaad SuperBasic Ouicklonder with Gikel prog. 
£9.00 ramming uly. 515.00 
‘iiberaioe Badigot Version ror MDV)... 36. 
BUSINESS SOFTWARE (Suitable for standard Ola) 
Small Tradors Pack £24.95 tnvoicer £19.98 General Ledger £19.08 ot of tee £40 Mal Merger £14.98, 
Fer Pack £14.98 Algo Stock Accounting £38.96 (For Expanded Ola) Sand 8-A.E for Software leaflets OF 
phone 
SEIKOSHA GPIOUA PRINTER Dot-Matrix contronics 50 cps, Graphics, Tractor Fwd, 
‘Centronics Interface 620, (i! bought with printer) 530 
. TOM DAISYWHEEL PRINTER Seria prints a! 20 cp, can print 1 3 copios. Paper with 
Tins. Char por line: 118,138 or 173 (ealecrable on top panel Buller 298 bytes. Obtainable 
ceniras! Contronics module, 2-sol ribbon, tractor and auto theet feed #48 


Inerchargeable pli. wtrace medusa N10 per eval paraabcontonin IMP of 


arg 


20 
‘TERMS CWO, ACCESS or VISA 

‘Minimum order 4. PRP 18 for printers & Ola 

(Oversvas £15}. Other toma £2" (Overseas £8) 


EEC LTD 


18-21 MISBOURNE HOUSE, CHILTERN HILL, 
CHALFONT ST PETER, BUCKS, SLO 9UE. 
‘TEL: 0753 888966 FAX 0753 887149 


NAME The cost of 1-30 words inclusive is £15. Prepayment is not necessary 

ADDRESS. as you will be, invoiced for the sum of £15 following publication, 
Settlement of the invoice will be required within 30 days of receipt. 

DAYTIME TELEPHONE No. sabe ie Eh 
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CHINESE CHESS 


The Authentic game for the QL 128K 
£14.95 incl. P&P. 


Available on MDV and now on 3¥4" and 5%" disks. Please state. 
ANT PUBLISHING 
11 LATTON CLOSE CHILTON, DIDCOT, 
OXON OX11 OSU. Tel.(0235) 834254. 


QL ROMS AND SPARES 


ROMS. MGE (Spanis! MGF (French), MGG. 
(German), 18 (English), 2 wach. JM (English) 
£10. 

MOVS, Complete OL MDY Subunit £20. head 
land Chassis £10. Microswitch €2. Motor £6, 
Rubber & Plastic Roller £2. MOV2 Stand-off 
spacer + sorew £2, ULA £5, Tr 45,6.7 set (2 
MDV pb inc, ULA £1. Prices include UK 


postage. Send SAE for price list of all OL 


LJS TRUMPCARD. 3.5 twindrive, 
e, cub colour plus Sanyo mono 


monitors, Star LC10 printer, Cash 
Trader/Analyser, Archive Tutor, etc 
£600 ono, will split. 081 940 0967 
afternoons/evenings. 


STRICTLY FOR YOU. Dial 0898 442 


514 (25p/38p per min), Dial It If You 
Dare. 

STAG LINE. With Special Sound 
Effects. Dial 0898 442 604 (25p/38p per 


min) 


ABC Elektronic 

(01049 521 ROOBAT 

Care Electronics 

0923 672102 

Thor International 
(10 4833 930308 

O10 4533 997544 

Digital Precision 

01-827 $493 

Dises. interfaces. drives, 
keyboards, RAM expansions. 
EEC Ltd 

(0753 BREROA 

Ls. peripherals. accessories, 
Miracle Systems 

(904 4239R6 

Trump Card interface, modems 
hard dise drive 

PDQL 

O21 200 2313 

Memory extension, disc drive, 
Z-8H. printer 

QJump 

(Tony Tebby) 

(54 S0KO0 


Schén PCP 

4865: 3836 

Keyboards, utility software 
Strong Computer Systems 
0267 231246 

Interfaces, peripherals 

Sector Software 

(1772 484328 

Peripherals. 

TF Services 

(1-724 9083 

Repairs, spares. peripherals 
TK Computerware 

(308 812801 


QL COMPUTER worth £450 includes 
manual, 25 games, touch typist, 
graphic toolkit, four business prog- 
rammes all with backups, will accept 
£200. Phone Anish Patel on 081 579 
4885 

IDEAL FOR SERIOUS BEGINNER QL, 
Minerva ROMs, 521K internal RAM, 
Philips green monitor, 2*5.25 disks, 
Tandata modem set, Modaptor+, 
ROM RAM disk. Quill, Archive, Aba- 
cus, Easel, Speedscreen, Discover. 
TexTidy, | TechniOL,' —_text87, 
founted89, Editor, Forth, Pascal, 
Assembler, Monitor, 288-QL. Books. 
Offers. Stevens, 0763 72134, (Hert- 
fordshire). 

EUROWORD Text Handler, Type, edit 
save, print documents in English, 
French, German, Spanish, Italian, Pol 
ish, Serbo-croat and RUSSIAN, Easy 
keying for all characters, Mulli-tasking 
Prints to Epson compabitle 9-pin dot- 
matrix printers. On 3.5" disc. £15.50. G 
Jackson, 14 Castle Road, Whitby, Y021 
3NJ. Tel. 0497 603839, 


HARDWARE SERVICES 


Adman Services 
(0952 255895 
Suredat 
(1-902 $218 

Repairs, 

QL World 

(reader services) 

TIL. O92 834783, ONV2 832952 
Subscriptions, back issues, 
Microdrive Exchange 
Quanta 

User Group, support 

Hon. secretary, Phil Borman, 
(0472 49850 


Xchange User Group 
Freepost 

Beckenham 

Kent BR3 2BR 


SOFTWAR 


Athene Consultants 
(0705 511439 

ARK Distribution 
(0983 79496 

Archivist, Master Spy and other 
business and utility software 
Byteback 

(0636 79097 

Call Us What You Like 

55 Greenan. Shaws Road, Belfast 
BTI! BLX. No telephone 
Superspy 

Caravan Software 

01-840 6034 after 6pm. 

Morse Practice. Fun Puck 
Care Electronics 

0924 672102 

Tony Tebby software, Miracle 
hardware. peripherals. utilities. 


C.G.H. SERVICES 


Cwm Gwen Hall, Pencader, Dyfed, Cymru, SA39 SHA. (Tel. 0559 384574) 


Products Type 
‘Anel Pury Quat 

Blag2 

D-Day Mk I! (Special Ed) 
Dreamlands 

From the Tower of Valagon 
Grey Woit 

Here We Go 

MacSporran’s Lament 
Open Got 

Qui Master 

Return to Eden 

Starplod 

The Gee Gee System 
Uncle Loonie’ Legacy 
Voyage of the Baano 
Voyage of the Beana 
Wreck Dive 


Teal Review 7-8 OL Adventurare Forum 1-8, We olga Gratibute a wide 
Shareware titles, Please send an s-2.8 for datalls. We would iketo hear 


Text Adventure 
Text Adventure 
Wargame 

Text Adventure 


llustrated Adventure 
Golf Simulator 


Memory fip— 
128K 
256K 
256K 
256K 
128K 
256K 
128K 
129K 
512K 
128K 
255K 
128K 
128K 
129K 
250K 
250K 
126K. 


© 800 
€ 800 
£13.00 
£8.00 
£ 8.00 
€ 9.00 
£10.00 
£8.00 
£ 9.00 
£10.00 
£75.00 
€ 8.00 
£10.00 
£ 800 
£10.00 


£800 


{rom any prograrimers wishing to have their programs published, 


mich 


£10.00 
£10.00 
£21.00 


£10.00 
£14.00 
£10.00 
£10.00 


e100 
£1000 
£10.00 


10 


£1300 
£10.00 
‘Weregret that we cannot deal 
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QL REPAIRS 


ANY FAULT £27.95 INCLUSIVE OF P&P, VAT 
INSURANCE AND 3 MONTHS GUARANTEE. 
FOR REPAIRS ON OTHER MICROS 
PHONE FOR DETAILS. 


SUREDATA 


Telephone: 081-902 5218 


UNIT 6, STANLEY HOUSE 
STANLEY AVENUE, WEMBLEY 
MIDDX. HAO 4/80. 


CGH Services 
(058934 574 
‘Adventures, QLAF 


Compware 

0270 $8230) 

Tusk Swopper, Mega Toolbox, 
Expert System Shell and others, 


Creative Codeworks 
021 426 5199 
Speedscreen 


Digital Precision 
01-527 $493 

Turbo Ba 
Publisher: 
graphics, Sprite generator, Super 
Forth, Better Basic, Professional 
and Super Astrologer. Media 
Manager. Supercharge, 
Blocklands. Driodzone, Aracadia, 
Reversi, Backgammon, Master 
Bridge Tutor, C-M Emulatar, C 
compiler, Lightning speed 
enhancer 


DJW Software 

(0256 88) 701 

Home Banker 

Eidersoft 

089283 2552 

Games, utilities, Ice. 
Pyramide. 

ImaQLate Software 

42 Albion Street, Brondstairs, 


Kent CTI) INE 
Biograph 
PDQL 

021 200.2913 


ral business and utilities 


Cash Trader. 


jons. including DiscOver. 


QL Supersoft 
0256 475992 
Home Budget, Superdraw 


Rob Roy Software 

94 Teignmouth Roud. Clevedon, 
‘Avon BS21 6DR. 

Rob Roy and Palantir. 


Sector Software 

0772 484328 

Flashback and other utilities, 
Peripherals. 


SD Microsystems 

0462 422897 

Business software including 
General Ledger, Small Traders 
Pack/Invoicer and Stock 
Accounting 


Software 87 
33 Savernake Road, London NW3 
yu 


Talent Software 
0303 813883 
Utilities. games. 


Thornado Systems 
(10 062. 877244 
Thor systems, software. support. 


TK Computerware 
(9303 812801 
Add-ons. spares. software. 


WD Software 
(534 81392 
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Flight of Fantay isthe very att Amiga 600 puck rom Commodore, 
featuring BRAND NEW sofa 
taeulr As00 pack 


with mouse controll 
tiles, Those include the lollowing: 


The high quaity graphs progam that | The ulimale i igh saaaon wha choice 
satin aro na our bale vironment 

‘oh aitorwt acta! 
‘arial combat, steatoge bombings, 


fr jut too cockpit apluys, including "Ue Yeon" 
nance IN raaiate fea ot ihe sunning 
‘mulation 


PACK INCLUDES: 
‘A500 Computer & Mouse £399.99 
A520 TV Modulator... £24.99 


Dy ie Robot Monsters and forced to foxe Patni 
aneviReba Amy io DEsTnoy | | Deluxe Paint It Lapel 


For the more serious or professional apple. | EAN Jom and rwign mer'way | | EXcape/Rabot Monsters £19.99 
ons user, Commodore have a selection of | Novsnose vob |] Rainbow islands. £2495 
sysioms based around tho expandable Amiga F29 Retaliator £24.95 
2000, at prices front £¥2854VAT. The Az000 " DILLEARES ERacaS 
features a full Mb RAM (expandable to Mb), F six) on your magic phows, peachse: Pac i" 

The Commodore A500 Batman Packmuat' | PACK INCLUDE: B aysiom expansion sll ue IBM com: | og’ ann nay nay || LA8® Pack Saving:_S14582 
surly ras one ofthe most popular com: | ag eich 9 Le en tee eeenee meee rece Pack pada? eaenae 
puter packs ever! The pack featuros the rhonay morihomsciing er py bridgeboards, Complete and return the | of Ooh a Monster Inland, you wil an 

Commodore Amiga 800 computer with | AB20 TV Modulator .... £24.09 J DiGi marin Sate ‘ountar Dom hima tingh 
mouse controller and TV modulator plus | Batman The Movie. £24.95 | fryfonpannoa to. ‘th oma machi ra 

four top sofware tiles, The software in | New Ze £24.95 | Getalls of A2000 com. Pm peaen ata ed 

cludes: "Batman The Movie’ - Rid Gotham pI £24.95 | puter systems. +VATe 1400.26" ‘word f dardroas le aba 
Gil me cunning okt. n Deva on | Deluxe Plat £49.95 

man film; New Zealand Story - high quali TOTAL RAP: £549.78 

ty Conversion of the leading arcade game; Less Pack Saving: £150.78 


Interceptor - Dogtight with two Fae’ in Poy] 
is loading tight simulator; Deluxe Paint PACK PRICK!) £200.00 


W- top quality Amiga graphics package £399 
which set the standard for others to follow. we 
Floturn the coupon for further details. var 
MAIL. ORDER: 1-4 The Mews, Hatherley Rd, Sidcup, Kent, DAt4 4DX Tel: 081-309 1117 


e ~ ecunp DP Vy | ‘Oraer Lines Open: Mon-Sat 00am 006m, NO Late fight Opening Fax No- 081908 0008 
| ILICA SHOP ER YOU CONDON sHoP 2 Tottenham Court Road, London, WIP OBA ek 077-880 4000 
Eviah RaCnlarg GeeeNErE TT paring oust Mon Gut sonar Lite Na Threeall Spey Fax Ae onsen 


d INE: Team ot Amiga technical experts at your service, aerGawntg tein: _uonan osanenen™ "Tay Od, Sidcup, kent, DATS ADK, Wl ORF 902 8641 


We normally match competitors on a "Same product - Same price” basis sha ee : 
Proven track record in professional computer sales ace inte Sor Men tinataamen®. Patera id, Sidcup, Kem, DATA 40X, Te, O87 08,0088 


Solid and reliable with maintained growth. 
Volume discounts available for large orders 
Demonstration and training facilities at our London & Sidcup branches. To: Silica Shop Ltd., Dept QLW 10/90-32, 1-4 The Mews, Hatherley Road, Sidcup, Kent DA14 4DX. 


oe somationy comet arent 


RETURN THE COUPON FOR FREE COLOUR BROCHURE 


{Al of your Amiga requirements ram one supqler Ak err reerrveeer a 
SUES: Will be mailed to you with oHlers and sottwareiperipheral details, | PLEASE SEND INFORMATION ON AMIGA | 
T: By cash, cheque and all major credit cards, - - — — —— 4 
Sica ae icense cre brokers = eturn coupon for dotais. ; : 
Betors you decide when to buy you ler, we Suggest you think very carefully aboul WHERE Mire ee wa cine: 
You Duy Constr hott oie Siarin Paninaa thon ters reuie oateel 
Fororaraiacreottar ofa snd nevcenin yt new arenes ane Une eT eee Address 


You with details of naw products? A Silea Shop, we ensure that you will have nothing to worry about, Sl 
Deen established for over 12 years, and have an anvwal turnover of €13 milion. With our untvallod experience 
and expertise, we can now claim to meet our customers requirements with an understanding which ls second 
To.none. But dont just aka our word for. Complete and return 


‘he coupon now for out latest Frog Ilerature and begin to ox 
perience the "Silica Shop Service! 


RETURN THE COUPON NOW FOR Postcode: Tel: 


FREE BROCHURES 


Which computer(s), it any, do you own? 42000 


BRAND NEW 
MICRODRIVE CARTRIDGES 
£2.00 EACH ANY QUANTITY 


Sector Software 


The best programs and peripherals,for the QL 


QZ/QL to Z88 File Transfer 

Software and cable to connect the Z88 and OL and 
transfer any files between them. Includes Archive to 
Pipedream and back conversion routines. £25 
Amiga to Z88 File Transfer 

Software and cable to connect the Z88 and Amiga and 
transfer any files between them £25 
Spellbound 

A spelling checker that checks your spelling AS YOU 
TYPE. Based on a 30,000 word dictionary, works with 
Quill or The Editor V1.17 onwards on the expanded 


aL. £30 
Taskmaster 

A brilliant multitasking front end system which lets you 
use the QL as a serious machine. Multitask many 
programs at once. £25 
Files 2 

File handling utility with scores of features. Written 

by Peter Jeffries. Ideal enhancement for Taskmaster 
users. £12 
Write Turn 


Turn spreadsheets and documents on their sides with 
this excellent utility, works on Epson and compatible 
printers. £12 


QL World Index 


A complete index to the contents of QL World from 
its start to May 1988. Find articles and reviews in 
seconds, 160K+ of data compressed to fit into a 


128K QL. £6 
Flashback 

A very fast and slick database which has very few 
limitations. Will also convert Archive files. £25 


Flashback Special Edition is a greatly advanced 
version with lots of extra features including report 
generator, mail merge, label printing, etc. 


Touch Typist 
Excellent typing tutor that works. 200 lessons, graph 
of your progress, adjustable difficulty levels. .........£12 


Ferret 

Find lost files fast with this file search utility which 
will read all your files on disk or mdv looking for a 
match with your search text. £12 


STD Index 

This index to all the dialling codes in the country 
executies from disk in 15 seconds. Know the place 
and it will tell you the number, know the 

number and it will tell you the place! 

(Expanded QL only.) £12 


Page Designer 2 

This is a full feature desktop publisher that has to be 
seen to be believed. Ask for full details of this system 
and its support programs. £35 


Phillips CM8833 Colour Stereo 


Monitor 
A stereo monitor for the QL, Amiga, ST or almost any 
computer. £260 


DRAMATIC PRICE 
REDUCTIONS 
ON STAR PRINTERS! 


Star LC10 printer £190 

Star C10 colour printer .... .£230 

Star LC2410(24 pin) printer .. £274 
(Please add £6 if carrier delivery required) 


288 Computer .£230 
Z88 All in one pac! |, carry case, power 
supply, batteries, user manual)... so £287 


£7 
£25 
£10 


QL Keyboard membrane. 
QL Service Manual 
2X8301 ULA... 
3.5in. DSDD disks (each). £1.25 
Cartridge Doctor (rescue corrupt MDV’s). £16 


New Price List available — Send for your free copy 


eux @ Sector Software 


Unit 13, Centurion Way Industrial Estate, Farington, Leyland, Lancs. PRS 2GU 
Tel: (0772) 454328/452414 (2 lines), Fax: (0772) 454680 


